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This  writing  is  co&tinuatiai  of  the  Phase  I  Report  of  the  Ground 
Slide  Airdrop  Study,  ER*3841.  AAI  lias  performed  this  study  under  Contract 
No.  DA*  19*  129*AMC*337 (N)  from  the  U.  S«  Army  Natick  Laboratories.  The 
specific  object  of  this  report  is  to  present  the  findings  of  the  Exploratory 
Test  Phase,  Phase  II,  and  compare  these  actual  findings  to  those  predicted 
by  the  analysis  presented  in  the  Study  Phase,  Phase  I.  Also  included  >' r. 
this  report  are  all  changes,  deletions,  and  revisions  to  be  incorporated 
in  the  preliminary  design  specifications  of  the  Phase  I  report. 

The  actual  findings  were  acquired  from  tests  performed  at  Fort 
Bra^g,  North  Carolina.  These  tests  were  conducted  by  AAi  in  conjunction 
with  the  C.  S.  Army  Field  Test  Team.  The  test  description  and  test  program 
is  explained  in  the  Report  of  Exploratory  Test  Program,  ER-4J56.  Figures  1, 

2,  3,  4,  and  5  show  a  typical  drop  sequence  from  an  actual  test.  Table  1  lists 
tests  with  the  associated  test  conditions. 
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II.  PRESENTATION  OF  RESULTS 


A.  General 


The  results  of  the  test  program  and  the  corresponding  computer 
analysis  for  each  test  are  presented  in  this  section.  These  results  are 
presented,  for  ease  of  handling,  in  three  phases,  i.e..  Extraction  and  Tip-off, 
Descent,  and  Ground  Impact. 

In  each  case  the  actual  test  conditions  were  used  as  inputs 
to  the  computer  program  and  the  computed  values  of  velocity,  time,  distance, 
etc.  are  compared  with  the  actual  values.  In  general,  the  tests  values  and 
the  computed  values  are  in  close  agreement.  The  discrepancies  that  do  occur 
Can  be  attributed  to  (1)  the  inability  of  the  equations  of  motion  to  account 
for  all  actual  happenings  such  as  initial  cargo  jerk  due  to  restraint  strap 
break  and  cargo  angular  acceleration  after  tip-off  induced  by  aircraft  pitching 
and  (2)  the  inability  to  select  the  inputs  for  the  computer  with  a  high  degree 
of  accuracy. 

Drop  No.  2  will  not  be  presented  because  of  camera  failure. 


B.  Extraction  Phase 

The  time-displacement  recorder  was  used  to  monitor  the  rel.-tive 
velocity  of  the  cargo  with  respect  to  the  aircraft,  during  the  extraction  phase. 
The  data  obtained  was  reduced  to  veloc i ty- versus- time  curves.  Figures  6  through 
19  show  plots  comparing  these  actual  curves  to  the  curves  predicted  by  the 
computer  analysis.  Dror  Nos.  1,  4  and  7  are  incomplete  due  to  lack  of  test 


data . 
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As  can  be  seen,  the  slopes  of  these  curves  are  quite  similar 
which  indicates  the  actual  "g”  loads  are  close  to  the  predicted,  however,  the 
amplitudes  for  a  given  time  are  noticeably  different.  This  is  one  of  the 
cases  indicated  earlier  when  the  equations  of  motion  are  not  capable  of  pre¬ 
dicting  actual  occurrences.  The  computer  equations  assume  a  rigid  non-flexible 
member  between  the  load  and  the  parachute;  thus,  theoretically,  the  load  is 

subjected  to  the  exact  force- time  output  of  the  parachute  which  decays 

2 

proportionally  to  the  decay  of  the  V  term.  This  results  in  a  velocity- time 
curve  which  is  relatively  smooth  as  shown  in  the  figures.  However,  in  the  real 
case  the  connecting  member,  being  nylon  webbing,  is  quite  flexible  and  can  store 
some  energy  prior  to  load  movement.  Therefore,  at  load  movement,  which  is  some 
predetermined  time  during  the  inflation  period,  the  load  is  subjected  to  force 
levels  for  a  short  time  that  are  higher  than  predicted.  This  gives  a  cargo 
jerk  which  results  in  an  initial  steep  slope  on  the  velocity-time  curve  with  a 
larger  amplitude  than  would  be  obtained  for  the  theoretical  case. 


C.  Descent  Phase 

Cargo  motion  during  the  descent  phase  was  recorded  by  high-speed 
motion  picture  cameras.  The  film  was  then  reduced  using  a  motion  analyzer 
to  various  useful  curves.  Plots  were  made  of  each  individual  test  showing  the 
actual  curve  and  the  curve  predicted  by  the  computer.  All  curves  start  at  the 
beginning  of  the  descent  phase  and  run  to  ground  impact.  Figures  20  through  33 
esent  the  plots  of  cargo  altitude  versus  horizontal  travel.  Plots  of  Drops 
No.  1,  3,  8  and  11  are  incomplete  due  to  the  inability  to  acquire  sufficient 


film  data. 
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A  second  curve  was  generated  from  the  data  obtained  on  each 
test.  This  curve  was  a  plot  of  horizontal  travel  versus  descent  time. 
Comparative  curves  were  obtained  from  the  computer  analysis  and  are  shown 
in  Figures  34-47.  Again  Drop  \’o.  1,  3,  8  and  11  are  incomplete  due  to 


lack  of  data. 


-i-~ 


Ffct 'WE 


r avjc  nu 


D-3V 


TRAVEL  VS:  DESCENT  TIME 


PAGE  NO. 

D-49 

REPORT  NO. 

ER-384I 

FIGURE  45 


4  I  N  C 


PAGE  NO.  d-52 
REPORT  NO.  ER- 3841 


AIRCRAFT  ARM  AMENTA.  Ino. 


The  third  plot  used  in  comparing  the  computer  analysis  against 
actual  tests  is  shown  below  in  Figures  48  through  61.  These  are  plots  of  cargo 
pitch  angle  versus  descent  time.  Drops  Nos.  1,  3,  8  and  11  are  not  complete 
because  sufficient  data  was  not  acquired  from  these  tests. 

In  several  of  the  tests,  as  shown  by  the  curves,  the  actual 
cargo  pitch  angle  is  quite  different  from  the  predicted  angle.  In  the  tests  the 
aircraft  is  pitching,  due  to  turbulence  and  aircraft  instability  and  this 
induces  some  angular  acceleration  to  the  cargo.  One  assumption  in  the  computer 
equations  is  that  the  aircraft  does  not  change  pitch  angle  during  extraction. 

In  figures  76  through  89  cargo  pitch  angle  was  plotted  versus 
drop  altitude.  In  these  curves  the  effect  of  aircraft  induced  angular 


acceleration  can  also  be  observed. 
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In  Figures  76  through  89  plots  of  pi- dieted  cargo  horizontal 
vcloc.ty  versus  descent  time  are  given  IXie  to  tin-  inaccuracies  of  graphics  1 ly 
integrating  distance-versus-time  data,  the  actual  velocity- versus-tine  plots 
are  n  >t  given  since  the  comparison  would  he  misleading.  However,  since  sueh 
close  agreement  was  witnessed  between  the  actual  and  predicted  curves  of 
horizontal  travel  versus  descent  tim.  ,  it  can  oe  stated  that  the  actual  curves 
of  horizontal  velocity  versus  descent  time  will  do  „n  close  agreement  with  the 


predicted  curves. 
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4.  Impact  Zone  Hardness 

5.  Impact  Zone  Material 

6.  Load  Platform  Material 

7.  Load  Impact  Angle. 

The  instantaneous  value  of  the  coefficient  of  friction  changes 
all  along  the  slide  path  in  the  actual  situation.  Whereas,  the  computer 
assumes  the  instantaneous  coefficient  value  is  equal  to  the  Average 
value.  With  this  though  that  the  exact  coefficient  of  friction  value 
is  nearly  impossible  to  obtain,  one  can  say  that  the  two  comparative 
slide  lengths  are  in  close  agreement. 
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III.  COMPUTER  PROGRAM 

A.  General 

When  the  computer  program  was  set  up  for  use  on  AAI's  computer 
it  was  necessary  to  rewrite  the  program  in  three  distinct  separate  phases 
due  to  the  size  of  AAI's  computer.  The  new  program  along  with  its  inputs  is 
presented  in  this  section.  Also  included  is  a  listing  of  the  numerical  values 
of  the  input  as  obtained  from  the  test  program. 

B.  Nomenclature 

Presented  below  is  the  program  input  nomenclature.  It  was  felt 
that  clarification  was  needed  as  far  as  defining  the  coordinate  system  of 
each  individual  computer  input. 

Nomenclature  Units  Definition _ 
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Nuuk* nc  lature 


Units 


Do  f i ni t i on 


Lyo 

feet 

y  component  from  parachute  C.G.  to 
extraction  point  in  ground  fixed 
frame  of  reference. 

Li. 

0 

feet 
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C3 

second 

Time  increment  for  descent  phase 

a 

feet 
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point  in  cargo  frame  of  reference 

b 

feet 

y  distance  from  cargo  c.g.  to  extraction 

point  in  cargo  frame  of  reference 


INC 
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.’.'onenc  latire 


L’ni  ts 


I>ef  ini  t  ion 


c 

feet 

2  distance  from  cargo  c. g.  to  extraction 
Doint  in  cargo  frame  of  reference. 

d 

feet 

x  distance  from  cargo  c.g.  to  center  of 
the  r>  1  at  form  floor  in  cargo  frame  of 
r -ference 

e 

feet 

y  distance  from  cargo  c.g.  to  center  of 
the  platform  floor  in  cargo  frame  of 
reference 

f 

feet 

z  distance  from  cargo  c.g.  to  center  of 
the  platform  floor  in  cargo  frame  of 
reference 

n 

feet 

z  distance  from  aircraf  c.g.  to  reaction 
point  in  aircraft  frame  of  reference 

m 

slugs 

Mass  of  cargo 

M 

slugs 

Mass  of  parachute 

I 

MX 

slugs- f  t^ 

Moment  of  inertia  of  the  cargo  about 
its  >;  axis 

I 

yy 

9 

slug-ft~ 

2 

Moment  of  inertia  of  the  cargo  about 
its  y  axis 

I 

Z7. 

slug- ft 

Moment  of  inertia  of  the  cargo  about 
its  7.  axis 

V 

V 

ft/sec 

x  component  of  wind  velocity  in  the 
ground  fixed  frame  of  reference 

V 

y 

ft. /sec 

y  component  of  wind  velocity  in  the 
ground  fixed  frame  of  reference 

V 

*  7, 

ft/sec 

z.  component  of  wind  velocity  in  the 
ground  fixed  frame  of  reference 

V 

ax 

ft/sec 

x  component  of  aircraft  velocity  in 
the  wind  fixed  frame  of  reference 

V 

ay 

ft/sec 

y  component  of  aircraft  velocity  in 
the  wind  fixed  frame  of  reference 

A  I N  l 
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Nomenclature  Units 


V 

az 

ft/sec 

d 

e 

feet 

1 

1 

c 

feet 

• 

slug/£t.  rad 

\ 

kd 

o 

slug/ f t . 

i 

• 

KD  2 

slug/ ft.  rad 

t 

i 

Ztest 

feet 

<CD  A)« 

ft2 

Diam. 

ft. 

gn 

— 

G 

F 

— 

fo 

slug/ft3 

Def ini t ion 


7.  component  of  aircraft  velocity  in 
the  wind  fixed  frame  of  reference 

x  component  irom  cargo  c.g.  position, 
before  extraction,  to  the  tip  of  the 
aircraft  ramp  in  the  aircraft  frame 
of  reference. 

Half  length  of  platform 

Slope  of  the  versus  <  (angle  of  attack) 
curve 

Cargo  drag  factor  with  ••  =  0 
Slope  of  versus  curve 

Altitude  test  for  descent  phase 

Product  of  drag  coefficient  and  inflated 
parachute  drag  area 

Skirt  diameter  of  inflated  parachute 

Number  of  parachutes  used 

Cluster  factor 


Air  density  at  the  extraction  altitude 


I 


/ 


PAGE  NO.  D-102 
REPORT  NO.  ER-3841 


JURCRArr  ARMAMENT*,  Ina.(l 


IMPACT  PHASE  INPUT  NOMENCLATURE 


Nomenclature 


Units 


Def i ni t ion 


Co 

second 

starting  time 

.:.t 

second 

time  increment  for  numerical  integration 

X 

o 

feet 

x  component  of  cargo  position  in 
ground  fixed  frame  of  reference 

X 

o 

f t/sec 

(  dt  K 

radians 

Pitcii  angle  of  cargo  in  ground  fixed 
frame  of  reference 

tr 

o 

rad/ sec 

(  dl  } 

dt  o 

L 

X 

o 

feet 

X  component  of  pa. achute  line 
length  in  ground  fixed  frame  of 
reference 

L. 

X 

o 

ft/sec 

d  i*  > 
dt  o 

V 

X 

ft/sec 

X  component  of  wind  velocity  in 
ground  fixed  frame  of  reference 

V 

z 

ft/sec 

Z  component  of  wind  velocity  in 
ground  fixed  frame  of  reference 

ALT 

feet 

Z  component  from  aircraft  C.C.  to 
ground  fixed  frame  of  reference 

K11 

feet 

X  component  from  cargo  C.C'.  t->  attachment 
point  of  external  dece lerat-T  in  cargo 
frame  of  reference 

K 

13 

feet 

Z  component  from  cargo  U.C.  t  '  attachment 
point  of  external  accelerator  in  cargo 
frame  of  reference 

a 

leet 

X  component  from  cargo  (,.  C.  t-  ext  action 
point  on  cargo  fr.i~.i-  of  reference 

c . 

feet 

Z  component  ir<n  cars:--  C.C.  t  >  extraction 
point  in  carg--  frame  -’i  reference 

o 

z 


A  INC 


PAGE  NO.  D-103 

REPORT  NO.  Eli-  384 1 


AMENTS,  I  no. 


Nomenclature 

Units 

Definition 

d 

feat 

X  component  from  cargo  C.G.  to  platform 
centerline  in  cargo  frame  >f  reference 

£ 

feet 

Z  component  from  cargo  C.C.  to  platform 
floor  in  cargo  frame  of  reference 

1 

c 

feet 

half  length  of  the  platform 

I 

yy 

slug- ft^ 

Moment  of  inertia  of  die  cargo  3bout 
its  y  axis 

K 

C 

slug/ ft 

Parachute  draf  factor 

m 

slugs 

mass  of  cargo 

M 

slugs 

mass  of  parachute 

CN 

Case  number 

G 

radians 

critical  pitch  angle  for  which  pitch 

may 

will  occur 

Dia.  Chute 

feet 

inflated  parachute  diameter 

•• 

coefficient  of  friction 

• 

feet 

line  length 

Z 

o 

ft/sec 

vertical  impact  velocity 

? 

“ 

,  2 

,  dx  . 

X 

ft. /sec 

(  — j  ) 

o 

,2  o 

dt 

f 

pounds 

magnitude  of  external  force 
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C. 


Below  ia  a 


Computer  Program  and  Imputs 
Several  changes  were  made  in 
listing  of  all  four  phases  of 


the  original  computer 
the  revised  program. 


program. 


J 
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00901 

00000 

00000 

00000 

ooceo 

ooqoo 

ooooa 

#0086 

00009 

00900 

00900 

A0Q8C 

Annas 

Annso 

nnnoo 

AO090 

nnooo 
noooo 
00000 
00008 
00000 
a  nnns 

nnooo 

nnooo 

nnooo 

60000 

00000 

00008 

00000 

00000 

90000 

00000 

00000 

00000 

ooooo 

90000 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 


• 

c  «»ound  slide  air  os op  -  extraction  phase 
c 

C  PAQE  NO.  t 

c 

COMMON  CN,DELT2,PS0,PSD0,«x0  RyC.RxDO.RyDO, xCyDO, XLZDQ, XLZO, 

IXLTa.THDa. THo»Ct6.Tc»T*RA*0»*AX.fiATfi/ VAY,RAZo» V  AZ » C.  3 ' P2# »  C2<> '  Ci» C 
2  4.C4.C5.C3?.C3*. XH2. Pg3»P22> XN, P?4, P25, P2  7» F . X A . C. X§, X J j, NTBLE » 0 1  A 
3MO.NOROO .CXF«XLH.XJYY»C48,XJ3.XJXX»C50»XJ2.XjZZ»C5l,XSn,C39»Ci2»*. 
4! STEP. IP. IP! »VX. VY. VZ,XLC»0»D£lT03, AIP13.DCLT0  , ZdTEST 

cou i valence  <data<1). cn> 

DIMENSION  DATA! 73) 

DIMENSION  A! 12.12 >,TA! 12), 8! 12  ) » TChuTE! 12 >, DR  I ! 12 > . XL  I < 12 > . XLDl! 12 
1  ).XLDDI(  12I.0R0QK  15  ).CDR*tH  15  ) 

READ  iOjTO.PSO.PSDO.RXO.RTO/RXOO.RrOO.XLirOO,  XLZOO ,  XLZO ,  XL T 0 .  THA .  PH 

ia.psa.raxc.rayc.razo.oelto.xipi .xA.xB.c.D.E.r, xn. xsm, xlm, xi xx, xi rr 

2. X  I ZZ. y X. y r. VZ /V AX, V A T.VA2. DC, DEL T 02, CELT  03. XLC, XXL A, XKOO.XXDA.ZPT 
3CST.XlPI2.XiPl3.COAO.DiAMO.ON.Cr.CN.RHO 
10  FORMAT! SF10.4) 

PRINT  4 , CN 

4  FORMAT! 12M1CASE  NUMBER , F 7. 4/1 7h  EXTRACTION  PHASE) 

PRINT  1, TO, PSO/P SO Q«RXQ/&Y9,RxD0,RyCO, XL  TOO. XL  ZD Q, XL ZO.xLTO.Tka, PH 

IA.PSA.RAXO.RAYO.RaZO.OELTO.XIPI ,XA,XB,C.D,E,F.XN,xSM.XLM,XIXX,XI yy 
2.XlZZ.yx,VY,VZ.¥AX.VAY,yAZ,DE,0ELTO2,DELT03,XLC,XXLA.XXO0rXKDA,ZDT 
3EST,XIPI2,XIPI3,COAO,DUMO,GN,CF.RHO 
READ  3000, NTBLE,! TCHuTE! I T6LE ). OR  I ( I TBLE  ) , XL  I C ITBLC  J.XLDI!  ITBLE  ),x 
1LDDI!  IIBLO.ITBLE-i,  NTBLE) 

3000  FORMAT! IiO/!5FiO. 3)) 

PRINT  30  01, ( TCHUTE! ITBLE  >,ORil ITBLE ) , XL  I ( ITBLE ) , XL0 1 ! ITBLC I.XLDOI! 
1 1 TBLL) , 1T8LE«1, NTBLE) 

C 

C  PAGE  NO.  2 

C 

3001  F0RHAT1//41H  CHUTE  DIAMETER  ANO  UNE  LENGTH  VAR l A T I  ON//! 1  OX , 5F 10 .5 
1  >  ) 

READ  4QOO.NDRDO.(DRO0  1<  I  I.CQRAII! 1  )  » I «1 » NDRDO  ) 

4000  FORMAT!  110/1 SF10.4  )  ) 

PRINT  40 0 1 ,  !  OROO  I  (  I  ),  CORA  1 1  i  I  J.lM.NOROO) 

4001  FORMA  T ( //?1H  ! CDA  )  RATIO  YS  0R/00//I 1  OX , 2F20 . 0  )  ) 

1  F0RMAT1//  JH  INPUT/! 4F20.8  )  > 

X-12 

C«F*RMO  •QH»QF  *C0  A(,/2  . 

X JXX «X I  X X /XLM 

xjyy-xity/xlm 

X JZZ*X I ZZ/XLM 
C49-X JXX-XJZZ 
C50»X JTY-X jZZ 
C 

C  PAOE  NO.  3 

C 

C51-X JXX-XJYY 
X J1*C49*X JYY 
X  J2»CM»X  JZZ 
XJ3-C51-XJZ2 


v7 

z 
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Util 

tetii 

mu 

lent 

inn 

util 

SIIU 

ftllt 

tmt 

#9091 

mu 

«#••• 

»«»»« 

#009# 

0008# 

MOM 

0*05# 

90011 

09900 

00909 

99999 

99998 

90900 

99990 

90098 

99089 
90009 
98898 
89000 
00898 

99090 
00090 
00800 
00899 
69000 

ooose 

80000 

90000 

96089 

06009 

00009 

00098 

90008 

69809 

80000 

00000 

90000 

00090 

00080 

00090 

90000 

90900 

90090 

90990 


C 

c 

c 


Ci-CoSfl  TmA/S?,293?9  ) 
C2«31*Fe  fKA/S?, 29579) 
C3«C0Sf(FH4/57. 29576) 
C4»S!Mf <  PNA/57. 29379  ) 

C5»C0«r< P*A/57«t9579 ) 
C*«S t*Fl PSA/37,2957*  > 
C7-C9*Ct 
C9-C3.C4 
C9*C6*C4 
Ci#»0C*0C 
Cj2*XS««32.i* 
Ct*«i.»X3K/XLN 

C2**PSA/57,29879 
C3#>C4«C1 
C37«C6*C3 
C39-C5*C3 
C39»Ci3*32.t6 
t'22*C7»C9«C2 
P23«C5*C14C9*C2 
P24«C5*C2-C9«0i 

PAGE  HO,  4 

P25»C6*C2»C9#Ct 
P26-C 3*C2 
P27«CJ»Ct 
PS0-  PS8/57.2937# 

T»T0 

0CLT2-  3CLT0/2. 

IPl-XiPl 

IP«I<»1 

ISTEP-1 

IK*t 

200  DET2-DCLT2 
PS1-PS0 
PSOI«PSDO 
RXJ  »RX0 
#ri«Rro 
RXOA-PXOO 
RT0i»RTO0 
xLTOi»xiro8 
XLZD1 ■XLZOO 
U21-XL20 
XLU-XLlfO 
300  TT-T8-T 

R*Xi-«*X0*VAX*TT 

R*U»flAr04VAr*TT 

PAGE  NO,  5 

RtZfRm*V*Z*TT 

00  4 J  0  1*1,12 
fit  I >*0, 

8( 1  )-0. 


*0060 
$9900 
•  6000 
*9910 

•  OOwO 

•  •000 

•  0960 
09000 

•  0000 
06000 
5S308 

eoooo 

90080 

ftosee 

83000 

88080 

£9380 

S98S3 
•8609 
30300 
•0038 
33900 
•  0686 
83009 
88630 
00800 
00003 
80600 
3000 
06900 
00000 
ooooe 
0(000 
Of  000 
0(000 
00000 
00000 
00000 
00060 
90000 
00000 
90000 

ooooe 

00000 

0Q03Q 

OCOOO 

ooooo 

00001 

ooooo 

ooooo 

ooooo 

eoooo 

OOOOQ 

ooooo 

eoooo 


do  418 

•to  n  i.j»«o. 

M 4,1  )«C13 
M 4*4  )•! » 

A( 5,2  )*C13 
m<  9»5  >*1 » 

M  •*  3  }*C13 
A< •»•)•!. 

A{ 9. 7  )*C4 
i( 9-1 >»P24 

•to»ai*fa5 
A(3,3>»-P27 
A( 7 ' 7  )*P36 
C1*»C26-P$9 
ei7«sinr<ci6) 

C16»C0$r<Ci6 J 
C19»C2«G*0-C36*Cl7 
C28*ss«rr( t r-ci39cie » 
e2s»cie/c?o 
caa=»P2?/c28 

C25*( C2*Ct?*838*C19  i/C-t% 

«8-»AZl»<  (RSO-RASt  >*P24*(PrO-4UYl  5*P25»Cl 4  >  <r'?7 
PAGE  *3,  £ 

RZDO-VAZ*! (RXDS-YAX }«FJ4*CPYD0— VAY }*P25>/P27 
PH9  *ACOSF<  C23/SQRTfi C22«C22*C23*C23 ) > 

If (023)9000, 9891,9031 
0080  PH0»-PH9 
9001  PM0a*-C22«C21*P$S6 

IHO- ACOSFC  C26/Sa«TF(  C20*C20*Cl9*Cl9  )  1 
{7(019)9082,9903, 9003 
6082  THO«- 7h0 
9003  TmD0»C23*PS00 
C24«SlMr?PS0> 

C29*C0Sr<  P5C  * 

027*025*023 

C26»C24»C23 

P1«XA*C19*C*C20 

P2*XA*C20-C*C19 

?3«®1*C23 

P4*P1*C22*X8*C23 

P5»P3-xS*C22 

C29»P2«C24 

C30»P5*C25 

C-3l«P2»C25 

032*P5*C24 

C33*2«*P4 

C40»C2<*C22 

C4l»C25«C22 

C42»?2*P2 

C43»PSDO*PSD0 

C44»PHD0*PH00 
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•  9899  C 

ooooo 

eioco 

W8006 

68000 

04099 

00000 

Ol'OOO 

0000ft 

00(190 

09000 

80000 

09600 

00000 

OOQvw 

00000 


C45«Th06*TH08 

C46.PHD0-PSD0 

C<7«PSpO*rM09 

C4d*PHO0‘T«D0 

CSJ-J • *P2*C4fi 

C53*C33*C46 

C54«2»«C4? 

P7«C24*Cl9*C27»C20 

P6«C25*Cl6-Cp8«C20 

Pll-Pi  •C25-*’2»C28 

P12»P1*C24*P2*C27 

P13-C2O-C30 

PI 4-C3i *C32 

Pi3»C2<?-P3»C25 

P19«C3i*P3'«C24 


•  6000 

•  9090 

•  •ooe 

•  0000 
00000 
60000 
ooooo 
•  0000 
ooooo 
60000 
09000 
60000 
60600 
06000 
•  0080 
00300 
00080 
•sooo 
ooooo 
•  0600 
06000 

•  9000 
000*0 
6*00» 
06000 
60000 
OOOOO 
60000 
60000 

•  0600 
•  0000 
ooooo 
••too 
06000 
00460 
ooooq 
•  0000 
•  0000 
00000 


P18*Pi*Pi*X8*X8 
Pift«<  XA«XA*C*C)»C22 
P20«Pi6*P3«xa 
P21»C33«P4*XJ1 
C 

C  PAGE  MO.  8 

C 

00  3dl0  I*  2.NT8LC 
in  TCHuTEi  D-TO  )  30J0. 3011. 3011 
301f  CONTINUE 

3011  tfRAC-  (T0-tCHUTE(1-l»l/(ICHUT£n  >-TCMUTE<  I-l>> 

0*-  OR  ll  I  -1  >♦<  OP  III  3—0*9 1  (  1  —  x  >  >«Tf* AC 
OROO-OR/Dl AMO 

XL-  XLK  l-l  »♦<  XL!(  I  )-XLlU-l  >»»Tl"*AC 
XLO-  XLOl<  |-1  )♦<  XLDK  ll-XLOH  l-t>J«TrRAC 
XLOO-XLOOn  t-1  »♦<  XLOOM  l  )-XLDDl  (l-l » )«Tf RAC 
XLXO-  -SORTM XL*XL-XLYt*XLY0-xtZO*XLZO } 

XLX0*-( XL*XLO-XLYO*XLYD»-XLZO«XLZOO  >/XLX* 

P37-  RXD0*XLXD6-PS3*PSD0*P4«C24*PHD6-Pll#THD0 
P36-  RTD0*XLT00»P14*pSD9-P4*C25  *PH09«Pi2*TH0O 
P39-  RZ00*XLZ00-P3*PhD0*P2*C22»T>D0 
DO  4910  1-  2.NDRD0 
moftoom  )-OR0«  >  4919, 4111, 4611 

4010  CONTINUE 

4011  CD*  A  T*  CORATKI-l  )♦<  CORA!  I »  l  l-CDRAT  l  (  1-1 )  )•(  0RD9-DRP0  I  (  I  -1  H/i  ORD© 
III!  )-OROOm-l  >1 

xxr-  cxr*coR*r 

P40-  XKr/XLN-SORTf < V37*P37*P3«»P30*P30*P39> 

r* 

V 

C  PAGE  NO.  0 
C 

All.il-  — P  4 
A< 1.3  >•  PI 4 
A<1.4>«  -P* 

A( 1.6 >•  P14 
All, 7)-  P4*P13 

A< 1.6  >-»C3l *P5-C24*( x JYY*P18  ) 

C25*(P28*C22»X JTT  >-C24*P2»g8 

TAt  1)-  -P14»32.iO-P40«(P4*P37-P14*P3'»  >-P4 *P14«C43« C31 *P4*C44-(  P12« 
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ooteo 

iX8*C26“C22“C49  >*C45«C23“P21“C46“(  C40“X  ji“C33*P12  )»C4?«C52*P12-tt7» 

totto 

2xJ3“C4« 

ooooe 

4(2*2)“  P 4 

90090 

A(2>3)«  -P13 

toooo 

4(2*5)“  P4 

99009 

4(2*6)“  -PI3 

99009 

4(2.7).  P4.P14 

09090 

*(2.0)“  P2*c32-c25.< P1«*xj XX) 

OfOSO 

4(2,0)“  -C31“X8-P20“C24-C49“XjXX 

90909 

Y4(  2 )“Pl3*32.16*P49*(Pl3*P30-P4“P34)“P4“Pi3“C43-C29“P4“C44-(Pll“X9 

09000 

1*C27*C22*C50 )“C45-C24*P2i“C46M  C33“Pil“C41“X Jl  )*C47“C52*P11-C24“X J 

99090 

22.C4I 

9900Q 

C 

00009 

c 

P40E  NO.  16 

99903 

c 

90000 

4(3.i)«  P13 

99000 

4(3.2)“  -P14 

90090 

4(3*4)-  P13 

99900 

4(3*5)“  -Pt4 

0009Q 

4(3.71“  -C42~P5“P5-XJ2Z 

00000 

4(3.9)“  P2*P4 

09009 

4(3*0)“  Pi*P5»C23*( X JZZ+C42  ) 

99900 

T*(  3 )«P40c{  P14»P36-P13*P37 )♦(  P2“P5-C24“C25“C5l >“C44«C22“<P2“XB*C4fi 

90909 

l“C25“C5t ) »C45 ♦C53“P5-C54“P2*P4»C5W*C22*C44“ ( COSf( 2*“PS0 >*C5i-X JZZ- 

099T9 

22. «C42 ) 

09999 

4(4,7)“  -P13 

69990 

4(4*9)“  P4«C24 

99000 

4(4.0)“  -PU 

90009 

4(5*7)“  Pt 4 

99009 

4(5.9)“  -P4»025 

99990 

4(3.9)*  -PI 2 

09000 

4(6*4)“  -P5 

OOOOA 

4(6.91“  P2»C22 

10(500 

c 

94000 

c 

page  ko.  11 

99990 

c 

40000 

A( {0*  4  )•  XLX0 

00090 

4(  t0* 5  )“  XL 74 

99099 

44 10  » 6  )“  XLZ9 

09009 

YA(  10 )•  XL“XLDD-*LX06*XLX04-tLYO0*XLY0C-*LZ09“XLZD4“XLD“XLD 

09000 

A( tl.l  )“-KSN*XLY0 

00009 

4(  u*2  )“XSN*XIX0 

00909 

4(12*1 )*X8H«XLZ0 

90009 

4(12*3)“  -X3H*XLX0 

99090 

C3«*  C22*C3 

99909 

C35“  C14*C3 

99999 

P6“  C22“C24 

99999 

P54«  P22*C24*P23“C25 

09999 

P29“  P32“C25-P23*C24 

99990 

P3|“  C34.C14«C23#C4 

99999 

P32*C23“C35-C22*C4 

99009 

P33-  R4X1-RX0-P24«XN 

9(669 

P34“  R*Y1-)»Y|-P33*XN 

96099 

P35r  9AZ1-RZ0“P27“XN 

09990 

c 
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MO?' 

C 

PAGE  NO.  13 

MOJO 

c 

00000 

P41"  P*/*LN 

oosoe 

P42*  P7/XLN 

•  oooo 

943*  P«/*LH 

09000 

Atl.iOl*  -P33*P4l-P35«P<3 

90009 

At  1.11  -P23*P4i-P2<»*P43 

ooooo 

At  1 . 12  >*  C37«p4t-C4*p43 

00099 

4(2.10  1“  °3«*P41*P35*P42 

QC0C0 

A( 2.11)»  P22*P41*P26*P42 

00000 

*>2,12)*  C38»P41 *C4*P42 

ooooo 

A( 3 > 10  > *  P34*P43-P33»P42 

80800 

A( 3. 11  )  »  P22*P43-P23*P42 

09090 

4(3.121*  C38*P43*C37*P42 

99000 

At  4.10 J*  P43 

90000 

4  )*  -P37*P40*P14*C43*C32*C44*PlA*C45-C53*C2»-Pi2*C54-C52*C48 

•0000 

K5.1CI*  P42  „  ^  „ 

90000 

YA(5>«  -P38*P40*Pl3«C43-C3MC44*Pl5*C45-C24#C»3*Pll*C54*C5a«C4t 

ooooo 

c 

ooooo 

c 

PACE  NO.  13 

ooooo 

c 

90090 

At#. 101*  -P41 

09000 

r  At  a  »«  -cso-Fv'p^POO^PAACoo^cajAPi^CAS+csa^cai 

OOOOO 

At  7*0 )*P20 

00009 

At  7.9)*  -C22*P29-C23*P2# 

98000 

Y At  7  )•  -P2«*C48-P284C22*C47*(  P28*C22-P29<»C23  >*C44 

ooooo 

A(11.10»-P7*YLI8-P9*XLY8 

00080 

YAtll >*9.9 

69000 

At  12  » 10  )*  P8*XL*9*P8*XL28 

00009 

YAt 12  >*  C12*XLX0 

90908 

4(9.81*  ~C3*C17 

ooooo 

A<9.9I*  -P31 

ooooo 

rAt  81*  -C35*CA6*C34*C1,7*C47-P32*C44 

ooooo 

CALI  SINE02 A.YA.B.X ) 

OOOOO 

c 

OOOOO 

c 

PAOC  NO.  1 t 

00900 

c 

90Q0Q 

IS ?SP«  -15TEP 

00800 

tr* tSfCPI31Q.909.35B 

OOOOO 

3,10 

IP*  M»*8 

OOOOO 

Iff  l^-IPI 1210.229. 220 

OOOOO 

329 

*•  ftx»»yx*TT 

90080 

Y* 

90009 

I-  929*97*1? 

90009 

IP*  •*9LK9«P14 

68900 

YP*  Y ♦XL Y9 *Pi 3 

89000 

2P»  2*XL?3*P4 

oooea 

XC*  UXOOfYY 

ooooo 

YO*  R<D0*YY 

80000 

20*  RZ0O+V2 

•oooo 

rc»so«rr< xSm«xsm«<  b< t  i*§< i »*st  2 »*b<2  »•( st  3 1-32,1* >»< g<  3 1-32.1*1 

99QOO 

i< 10  J»B< 10 >*2.*XSN*B< 10  >*MM  1 >*P«*B«  2  l*P7-( 8( 3  1-32. 16 J  +  PB > » 

0990  0 

PRINT  2  . TO. X. Y. 2/XO. YO. 29.XP. VP.2P. PSO. PHO. THO. (B(  1  >> !*1.17> 

90009 

29 

FORNATt///4r20.«/  (28x.3f29.*  )» 

09900 

PRfNt  41. TC 

>♦8 


rv_  i  r  i 
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90000 

e««M 

•  •009 
09000 
0080C 
9S?0f 
BO  IOC 
90090 
90000 
01090 

•  0090 
90809 
00009 

•  eobo 

90008 
08000 
fcseoo 

09000 

•  O'JOO 
011000 

•  '1000 
'49J9 
•9000 
90900 
09000 
99009 
00099 

90009 
09909 
00099 
88009 
00008 
80000 
00909 
89998 
90099 
90309 
09990 
90088 
00000 
00968 
89088 


41  FORMAT! 2CX , F20 . 8  ) 

TP-0 

C 

C  PAGE  NO.  19 
C 

319  C55*  •( 11  >/B< 18  ) 

(F( !K  >3.3/2 

2  C01-  C55 

CIO*  (RXO-RAXO+DE)*!  RX8-RAX8+0E > 

I«»  -IK 

3  inC53»C35-C10>350.2l2.2l2 
312  PRINT  30. T8 

30  FORMAT! ///F 28. 8*2 END  OF  EXTRACTION  PhaSC  > 

XH2-CS3 

DCLT0-OELT02 

OEi.T2-DELT0/2. 

I3TEP-1 

IPI-XIP12 

IP-IPI 

C 

C  PREPARE  TAPES  FOR  INPUT  TO  PHASE, II. 

C 

WRITE  TAPE  1.0ATA 

WRIT*  TAPE  l.XKLA.IKDO.XKO* 

WRITE  TAPE  Xt'  TCHUTE !  I  I.DRil  l  l,XU<  I  >.XLDI<  I  I.XLDOM  I  >.l-l.NT«LC  > 
WRITE  TAPE  1.(03001(1 ».CDRATIU »rI»i,N0SD8> 

STOP 

330  RXDO -  RXD1+8! 1  )«0ET2 
RY09"  RYD1*8( 2  )*DET2 
Xt  TOO*  XL>  01 »8( 3  )*DET2 
XL2Q8-  XLZ01*B< 0  )«0ET2 
PSDO-  P501 »8( 1  l»0ET2 
RXO*  RXl*!RXDi*RXDC U0ET2/2. 

RY8-  Rri*(RYBl*RT06 UDET2/2. 

XLTO*  XLT1*I XL70l*XLYOO MDE72/2. 

XU20-  XtZl*(  XL20l«-XL2D0>#0ET2/2. 

PS8«  PSl*!P801*PB08)*DEI2/2. 

TO-  TO *0EL T i 
DET2-  DELT8 
IF! IS  TCP >380.999.200 
900  STOP 
END 


AIRCRAFT  ARMAMENTS.  I  no 


PAGE  NO.  D-ii.2 
REPORT  NO.  ER-3K41 


ooooo 

c 

GROUND  SLIDE  *1*  DROP  SYSTEM  TIPOfF  PHaSC 

•  ••so 

V£LOCF{OA.D8i»OA*OB*DCT2 

99090 

QlSPLFt  DA .08/ DC >-0A*<  D8*DC  M0ET2/2, 

90000 

COMMON  CN.OElT2.PSe.PSOO,RX0,RYQ,RXOa»RYOO»XLrDO, 

XLZOO.XLZO. 

00000 

l*LY0>THD**Tn0"Tt»'T8»T»RAX#*V**»RAr0»Y4Y»R*20AV*2,C13»P26.c26.c3.C 

00000 

24.C0.C5.C37.C30. Xh2aP23 . P22, XN*P24 ,P25»P27,f» XA . C, x8. X Jl . NTBl£,  D I A 

•oooo 

90000 

3H0»MDRDCrCKr, xLm»xJYY,C49,*J3. XJXX.C50.  X J2 » S JZZ. C5i  ,  X3p 
4FsTEP.lP.IPl ,VX.VY.vZ.XLC,D,0ELT03»XlPl3.OELTa  »  ZOTEST 

, C39.C12. V, 

00000 

EQUIVALENCE  <oata<i>,cn> 

00000 

DIMENSION  DATA<  73  ) 

00000 

0 1  HENS  I  OH  A( 12*12 >. YAt 12 >.8t 12 ) 

00000 

OMENS  ION  TCHUTEt  12  ) »  DR  I  (  12  >  *  XL  It  12  ).  XLD  I  (  12  >.  XLDDl  ( 12  ) 

00000 

DIMENSION  DRDOIUS  I.CDRATIt  15  ) 

00000 

c 

IF  Sji  IS  ON.  CASE  NUMBER  IS  READ  FROM  CARD  ANO  DATA  ON 

PAPER 

00000 

c 

TAPE  IS  SEARCHED  UNTIL  THIS  CASE  NUMBER  IS  FOUND 

00000 

c 

IF  SJl  IS  OFF  .  THE  FIRST  SET  OF  DATA  ON  ThE  TAPE  IS  USED 

00000 

IF(SEnSE  SWITCH  i  )?230/7100 

00000 

7000 

READ  0000. CCN 

00000 

oooo 

FORMATlFlO.O  » 

00000 

7100 

REAO  tape  i.oata 

00000 

READ  TAPE  l.XKLA.X*D$.XKDA 

G0000 

REAO  TAPE  l.t  TCnuTEt  U.DRH  l  ).XLI<  l  ),XLDl<  I  I.XLDDK  I  >. 

J-1,NTBlE  > 

oooo  a 

REAO  TAPE  l/(DRD0It  I  I.CDRATK  1  )»I«1,NORDO) 

00000 

f  Ft  SENSE  SWITCH  1  )7208.0002 

00000 

7200 

1  Ft CCN-CN >7190.0002.7109 

00000 

0002 

PRINT4.CN 

09000 

4 

FORMAT ( 12H1CASE  HUMBER. F7.4/13H  TIPOFF  PHASE) 

00000 

200 

DET2-OELT2 

00000 

PS1«P50 

00000 

PS01*FS00 

00000 

Ht  i*»xQ 

00000 

RTi«PYO 

00000 

RXOl »RxOO 

00000 

RYDl»«rOO 

00000 

XL  YOl *xL  TOO 

00000 

XL  ZD1 *XL  ZOO 

00000 

XLZl«XLZ0 

00000 

XLt'MXLYO 

00000 

THOI*ThOO 

00000 

Tw1*ThO 

00000 

300 

T T  »  TO- 1 

00000 

RAX  1 *«AX04 VAX*  T  T 

ooooo 

RAYl«R4Y0»VAY*TT 

ooooo 

RA21««a20»VAZ*7  T 

ooooo 

00  4 i9  I  *  1 . 1 2 

ooooo 

T A (  I  )»0. 

ooooo 

8< l  )«Q. 

ooooo 

DO  410  J*  1  #  1 2 

80000 

410 

At  I  .  J  >*0 . 

00CG0 

it  4,1  )»Cl  3 

ooooo 

At  4.4  )•!. 

ooooo 

At  5,2  >*C13 

50000 

At  ?.5  Ml. 

ooooo 

At  6. 3  >*Cl3 

page  no. 


D-1'3 


00019 

90000 

00090 

00000 

00001 


00009 

90Q00 

90000 

00000 

ooooo 

00000 

ooooo 

ooooo 

ooooo 

90000 

ooooo 

ooooo 

09000 

ooooo 

90000 

ooooo 

00009 

ooooo 

ooooo 

ooooo 

09000 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

OGv'OO 

990C0 

ooooo 

00009 

ooooo 

0QCQQ 

ooooo 

099GQ 

oeoto 

ooooo 

ooooo 

QOQOS 

ooooo 

ooooo 

OOOOO 

0*000 

ooooo 

ooooo 


A<6,#)«1. 

440  A(7,7)»P26 
450  C16-C26-PS0 
Ci7*sl«f<Ct6> 

cio«cosr<cid) 

C19-SIN F< Tho  ) 

C20*COSF ( THO  > 

C23»{  C3«C3*Cl7*C16*Cl9*C4*SORTr(C00*C20-'C3»C3»Cl7*Ciy  J  i/<C20*\C3«C 
13*CtO«CiO»C4»C4n 
C22*S0RTF< 1 .-C23*C23) 

PHO-ACOSFi C22  ) 

|F( C23 >9009 >9001 >9001 

9000  fHO»-PHO 

9001  C24*$1NF( PSO  ) 

C25 »CoSF <  PSO  > 

C27-C25*C23 

C2«»C24»C23 

P6«C22*C20 

P7»C24*C14*C27«C20 

P0«C25*C19*C20«Ca0 

P9«C24*C20-C27*C19 

P10«=C25«C20'*C20*C14 

P17«C22#C19 

P3i-C22»C3*C10-*C23*C4 

PnOO«< ( C3*( P10*C0-P9fC5  »-PJ  7*C4  >*TmOO-C3*(P7«CO*P#*C5  >*PSDO  >/<  Pit* 
1C20  ) 

R20«R*Zl-(  Pa*(RAXt-«|8>*P7*(«Ari-St?0  J«XH2*<  P0*P23*P7*P22-P#*P2t>  >-X 
iNe<P8*P24*P7*P25*P6*$2?>'»F  >/P* 

P55»«Axi-Rx0-P24»XN«XH2*P23 

P56*RAYi-ST8-P25«XN»XH2*P22 

P57-R*Zt-fiZ0»P27*iH«XH2#P2<i 

P60«P55*U24-P30*C23 

P*1»P7»P55-P**P50 

PO2»C23*C29*P57-Pfe*Pfc0 

P63«Pt0»P55*P9*P56«Pi7*P57 

RZOO«VAZ-<  P8««  VAX-RXOO  l*P7*'  Y4T-RYD0  »-PSOO»Pfcl»PHOO*r«>2*7HOO*PA3  )/ 
iPft 

45#  Pl»XA*Ci9»C»C20 
P2-XA*C20-C»C19 
P3«P1 *C23 
P4*Pi«C22»x8»C23 
P5«P3-x8»C22 
C29op2»C24 
C30»P5»C25 
C31'.'2«C23 
C32»P3*C24 
C33«2.*P4 
C40*C24«C22 
C41 »C25»C22 
C42»P2«P2 
C43«PSOO«PSOO 
C44»PHOQ»PMDO 
C45-TH00*TH00 
C46«Ph00*PS00 
C4>-PSOO*THOO 
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00000  C4$»PWOO*THOO 

0Q000  C'5?«2.aP2»C48 

10000  C33»C33*C46 

00000  C3*T»2.*C47 

00009  P7“C24#C19-*C27«C20 

00000  P5«C25#Ci9-C2a»C20 

00000  t>U*i>i*C21-P3»C26 

00000  P12«P1»C24»P2»C27 

00000  P13*C20-C3I 

00300  Pl4«c3l*c32 

P0000  P15^C29-P3»C23 

00009  Pi6«C3l«P3*C24 

00000  P18*P1»P1*X8«T8 

00090  Pl>1«(  X  A«XA*C«C  )«C?2 

00000  P20«PtO*P3»XB 

03000  P2I*C33«P4»X Jt 

00000  00  3010  1 TBL£>2  »  NTBLE 

000 00  IE<  TC^UTE «  1T8LE  >-T0 *3018,3811, 3011 

00000  3510  COHTt'NUE 

oooeo  3ou  terao* to- Tenure* iTStr-i >  >/<  tchutet itble  j-tcmutet itble-i >  > 

OOCOO  DR-ORK  I  T8LE-1  >♦( 0Rl< I TBLE  >-DRl( ITBLC-I )  UTERAC 

00000  DROO-OR/OI AMO 

0000  0  xl**L  l  *  IT8UE-1  >♦<  IU(  !  TBLE  >-XLl*  lTBLE-1  >  )  • TER AC 

000  00  xLO-XLOH  ITBlE-1  )♦(  XLDHITBLE  T-XLDM  1  TBLE-i  )  )»IERAC 

00000  XLOO*XLOOI t  TT8LC-1 >*<XLODf ( TTBLE  I-XLDDIl I TBLf-1  )  )• TER AC 

0000  0  XLX0=>- SORTE<  XL  •  XI. -XL  Y ••  XL YO-XL  Z 0» XL  70  ) 

0  000  0  XL X 00 *<  XLOLO-XL  Y0*xCrD9-XLZ0*XLZD0  T/XLXO 

00000  P37«-RXOO«XLXOO-Pl3»PSOO*P4*C24.PMDO-Pli*TMOO 

00000  P3a*RYOQ»XLYOO«Pl4»PSD0-P4«C25»PMDO-P12**HOO 

0  000  0  P3P-RZOO*XLZOO-P5«PHOO'»P2*C22»TMCO 

00000  00  4010  I DR00*2 » WDROO 

00000  TEtORPOH IORDO)-DRDO>4010»4Cil,401l 

00000  4010  CONTINUE 

00  050  4011  CORA T -CORA TI(  I  OR  00-1  >•*  *  COR  3  T  I<  I  ORDO  J-CDR  A  T  I  <  I  OR  00-1  )  >»<  DROO-ORDO  I  < 

00000  tIOROO-l >)/(OROOl( I ORDO  T-0R00 ( < IDRDO-1 ) > 

00000  XKE *CKE *C0R  A  T 

00000  P40»XKE/XLM*SORTE( P3  7  aP37*P  36*P^M  «P3R*P39 > 

00000  A(l,i>»-P4 

00000  A(1,3)«P14 

80000  A(l,4|*-P4 

00000  A<1,6)«P14 

00000  i( 1 .7 )«P4»P13 

00000  A( 1 • 8 >«-C31*P9-C24»( XJTT«P1»> 

00000  A(i»9)*C2T»<P20*C2J«xJYY>-C24«P2*XB 

00000  YA(t  »*»P14*32.16*P4  0»t  P4»P3  7-P14»P3R  )-?4*Pi4«G43»C3l*e-*«C44-(Pi?AX 

00000  iB*C28»C22*C4<J)«C45*C23*.°21«C46«(C40*XJl'*C33»P12  ) «  C4  7  ♦  C32*Pl  2-C2  7*  r 

81000  2 J3»C48 

0000$  A( 2,2  >*P4 

00000  A  (  2 , 3 ) »-P 1 3 

00000  A(2.5)»P4 

08000  A  (  2  <  6 )  *-P i 3 

00008  A(  2. 7 >«P4i?l4 

88  0 00  A  f  2 , 8 >-P2*C32-C25*( P16*XJXX  > 

00000  A(2»9>«-C31»X8-P?0»C34-C4o«xjxx 

08000  YA(2)«P13*32.16*P40»C  PI  3  »P  39-P  4  »P35  >*P«**>13«C43-C?9»P4»C44-<Pii‘>x3 
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0  0000  1*C27«C2?«C50  >4C45-C24«P21*C46m  C33»Pll*C41«x  J1  )*C4? *C52 *Pi  1-C28* *  J 

00000  23*C4S 

00068  A«3»1J'P13 

•0000  A<3,2)»-P14 

00000  A(3*4)'P13 

•  0080  A<  3. 5  )»-P14 

00000  A(  3*  7  )«-C42~P5»P5-X  JZZ 

00000  A(3.8)»P2*P4 

00000  A( 3*9 )»P1*P5*C23»< XJZZ*C42 > 

0006  0  Y  A  ( 3  )«P4o*{ P14*P38«P13«P3  7  >♦<  P 2*P5-C24*C25*C5 1 >»C44*C22*<  P2*XB«C40 

000  00  1 •C25«C51 »*C45*C53*P5-C54.P2*P4«C22*C22*C46*( COSTl 2,*PS0  !*C51-X jZZ- 

00000  22.  *C42  ) 

00000  A<4.7l—Pi3 

00000  A<  4,8  )*>P4*C24 

00000  A(  4.9  >«-Plt 

60000  Ss5. 7i=>?14 

00000  A<9.6>—  P4«C25 

00000  A(5,9>»-P12 

80000  A(6*8»«-P5 

00000  A< 0.9 )*P2«C22 

00000  A( 10*4 >  *  XL  X  0 

00000  A<10,5)«XLY9 

80000  A ( 10*6  )  *  XL  Z  0 

00000  TA( 10  ) *  XL  «  XL  00-  XLX D$*XtX00-XL YD0*XL /D0-XLZD0*XLZD0 ♦ XLO*XLO 

00000  A( 11*1 >»-XSN»XLY0 

00000  A( 11.2 >»XSM*XLX0 

00000  A< 12.1  1*XSM«XLZ0 

00000  A( 12.3)--XSM«XLX0 

00000  460  C34*C22«C3 

30000  C35*C3»C1 8 

00000  P6«C22»C20 

00000  P28»P22*C24»P23*C23 

00000  P29=P22«C25-P?3«C24 

00000  P31»C34«C18*C23*C4 

00000  P32*C23*C35-C22sC4 

00000  P33*RAX1-RX0-P24»XN 

00000  P34aHATl-RY0-P25»XN 

00000  P35»RAZl-RZ0*P2/*XN 

00000  P4l»P6/XLM 

00000  P42=P7/XIH 

00000  P43«P6/XLN 

00000  A< 1*10  >*-P33«P41-P35»P43 

00000  A( 1 . 11 l»-P23»P41-P26»P43 

00000  A( 1 . 12 )*C37»P41-C4»P43 

0 OSS 0  A( 2.10  )*P34«P4l *P39*P42 

00008  A< 2.11 >-P22»P41 *P26*P42 

0  000  P  A< 2*12 »«C38«P4l «C4«P42 

00000  A< 3. 10 l»P34«P43-P33«P42 

OOQOO  A<  3.H  >»P22»P43-P23*P42 

00000  a; 3.12  )«C37»P42*C38*R45 

00000  ii 4. 10  )  *P  4  3 

00000  TA14)»-*'37«P40»P14»C43*C32»C44'*P16»C45-C53»C29-P12*C9  4-C9  2*C40 

00000  A(5.10  )  *  P4  2 

00000  r A(  5  >*  -P38*P40*Pt3»CJJ3-C30«C44«P15»C45-C2  4»C53»Pl i  »Ct>  4  .C52»C  « l 

00000  A<6,10>*-P4i 
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00000 

Y  *  (  6  )»-C39-P39«P40*P4*C44*C22**i*C45«C52*C23 

00000 

*(7/8  )*P28 

00000 

At 7/«  >«-C22*PS9-c23*P26 

ooooo 

r  *(  7  )--P2<J»C46-P29«C22«C4  74(  P26»C22-P29*C23  > »C46 

00000 

*(  11/10 )«P7«XLX0-P8*xLY0 

90000 

Y*< 11 )*0.0 

00009 

At 12/10 ) »P6* XL *0*P9**L20 

ooooo 

T*(  12 )-C12*XLXq 

00Q0Q 

470 

P9«C24«C20-C27*C19 

ooooo 

P10*C25*C20«C20«Cl9 

opcoo 

Pl7«C22*C19 

ooooo 

400 

P30-P24*C25*P23«C24 

ooooo 

P44«P25*C25-P24*C24 

oeooc 

P45«C23*C20 

ooooo 

P46»C23»C1 V 

ooooo 

P4  7  «R  A  x l-RX  0 

ooooo 

P45*RAU-RY0 

90000 

P49*RAZ1-RZ0 

ooooo 

P33-C3»(  P7eC6-»P0«C5  > 

ooooo 

P54«C4»P17*C3*<P9«C5-P10*C6  > 

00900 

A(  7/ 7  )  «-P53 

ooooo 

*( 7.8  )«-P3l«C2Q 

0  0  Q  0  0 

A(  7/9 >«-P54 

ooooo 

TA(  7  ) * C4  3»C3 •(  P8«C6-P  7*C3 )-C44»P32*C2Q*C45*(( P6*C6-P7*C5  >«C3*P6*C4 

ooooo 

1  )*2.«(  C46«P6*C3«C17*C47»C3*(  P9«C6*P10«C5  >-C46»P3j *C i 9  > 

ooooo 

A(  8. 1  ) aP8 

0000Q 

At  5.2  J  »P  7 

ooooo 

At  8. 3  >»-P6 

ooooo 

At  8, 7  )*P61 

ooooo 

At  8.8 )»-P62 

ooooo 

At  8.9 >*-P63 

ooooo 

Y  A  (  6  >  »-C4  3«(  P8»P55*$|7»P56  ) ♦ C4  4*(  P45*P60«?6«P57  > -C  45* (  P8»P35*P7*P5 

ooooo 

16-P6  «P5  7  )-2,*( ( VAX-RXOO  >•( PS  00 *P 7 «PmuO*P6»C24- ThDO »P 1 0 >-( VAY-RTOO  i 

ooooo 

2«<PSOQ»P8»P*DO»P6«C25tTnDO«P9>-(VA2-ftZOO)»(PHDO»P45*  ThD9*P17 >*C46s 

ooooo 

3P6*<  P55*C25*P56oC2« )*C47«(  P9»P55-F 1 0*P 5o )-C 48 * (  P 1 7»P6 Q-P 46»P 3 ? > ) 

ooooo 

670 

At  9 . 10  )=>Xh2 

00090 

At  9. n  »«-i. 

ooooo 

00  TO  500 

90000 

500 

CALL  S  t  neat  A. YA. B/K  ) 

ooooo 

l$TEP«-I$TEP 

09000 

If t ISTEP 1310/900.330 

ooooo 

310 

1P-JP*1 

00090 

Ift  .P-lPl >210/220/220 

90000 

22  0 

X«RX0+YX«TT 

ooooo 

Y«R  .  o  ♦  V  Y  »  I  T 

00900 

2«RZ0*VZ»TT 

09000 

XP»X*XLX0«P14 

00900 

YP«Y«XLY0»Pi3 

OQQGO 

ZP«Z*XLZQ*P4 

9  3  00  0 

XO»RXOO«Y* 

ooooo 

yO*RtOo*vy 

ooooo 

ZD»RZDO*VZ 

ooooo 

TC-SQRIf (  xS>{«XSh*(  Bt  {  1  )«Bi  2  >#B(  2  )*<  Si  3  >-32. 16  >•(  8i  3  >-32. 16  >  >*8 

ooooo 

It  10  >«et 10 )«2/6XSn«B(  10 )*( B( 1 >*P8«B( 2 )*P7-( 9t  3  1-32.16 >  »P6  >  > 

90000 

PRINT  2O.TO.X.T.Z/XD/YO/ZO.XP,YP,ZP,PS0/PHO/lMO.(B( l >/l*1.9> 

nnaoo  20  FORMAT! ///4F28.9/  <20x. 3F20.fi  >> 

noooo  PRINT  41, TC 

00000  41  FORMAT! 20X.F20.fi  ) 

00001  IP»0 

nnoeo  21  PR1NT22»!B! I  1,1*10,12) 

nnnoo  22  FORMAT! 20X.3F20.fi/ > 

00000  210  GO  TO  213 

nnoos  213  IF* a< 10  )  >215. 215, 214 

noooo  214  CS9«8!  12  >/8<  II  > 

nnoOO  Ct>0aP10»P47«P9»P4fiaPl7»P49«!P10*P23*P9aP22*Pl7*P26 )»Xri2*t Pl7*P27-P 

0.1000  110*P24-P9«P25  )•  XM«P54aC59 

00000  IF! C60-XLC-0 >350 .215.215 

00000  215  PRINT40. TO 

00001  40  FORMAT! ///F20.*,20M  END  OF  TIPOFF  PHASE) 

<>0000  K-K-J 

noooo  delto«delto3 

00000  DEL  r  2*DCL  T  0 /2  . 

00000  0ET2a0CLT3 

noooo  ISTEP-1 

nnnoo  IpI«xipi3 

nnnoo  |P«IP1 

nnnoo  C  PHASE  III  INPUT  TAPE 

nnnoo  write  Tape  l,  oata 

nnnoo  write  tape  i. xkla.xkoo.xkoa.pho.phdo.r/oo.rzo 

nnoOO  WRITE  TAPE  1 , ! TCHuTEl I l.ORIt I  >. XL  I ( I  ). XLDI  i  !  >. XLOOI ! I », l-l. NTBlE > 

nnoOO  WRITE  TAPE  l.IOROOI! I >. COR ATI! I > , 1*1, NDROO  i 

COOOO  GO  TO  900 

00000  350  RXOO-VELOCFIRXOI.B! 1 > > 

00000  R  TOO  * VELOCF !RT01. 8(2)1 

00006  XLZDO-TELOCF! XLZDI.B! 6 >  ) 

00008  XLTQOaVELOCFi XLTOl.0! 5  )» 

00000  PSOG-vELOCF! PSD1.0! 7  )  ) 

80000  RXO-O! SPLF! R X 1 ,R X D1 . RXD 0  ) 

00000  RY0aO!SPLF!Rri.RYOl.RTOe  ) 

noooo  X.LZO-OISPLF!  XLZl.XLZOl.XLZDO  ) 

0  00  00  XLYw-OiSPLF!XLYt,XLTOl.XLYO0  ) 

00000  P50-01 SPLF IPS! «PSOl .RSOO  T 

06000  THDQavELOCF! THOt.B! 9  )  ? 

80000  THO«OISPLF' IHl.THOl.THOO) 

OOOOO  360  TO»TQ»OELT2 

OOGOO  OET2-OELTO 

OOOOO  IF! ISTEP>300. 900.200 

OQOQO  900  STOP 

00000  EhO 
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•  0000 
•  0000 
90000 

00000 
SQQO0 
0*000 
00000 
00000 
eeooo 
•  00*0 
nnoos 

AMO  0  0 
Annnn 
Annnn 
nnnnn 
A  A  A  A  A 

aaaoa 

AAOOO 

a  nnoo 
nnooo 

AAflOO 

A  A  A  A  A 
AAA  AO 
A  A  A  A  A 

aaaao 

AAA  AM 
Annnn 
nnnnn 
AAAAO 

onnoo 

AflOOO 

«oooe 

ooooo 

00000 

00009 

AAflOO 

AftflflO 

A  Afl&Q 

nnnoo 

Ann  o  o 

nnnoo 

MO'jOO 

nnooo 

ooooo 

fcC-J&O 

AOOOO 

00900 

noooo 
nnooo 
non  oo 
Annnn 
nnnnc 
nnooo 
nnooo 


c  GROUND  SLlOC  aI«  DROP  ST8TEM  DESCENT  PHaSE 

VELOCF l D*»DB)*D4«D8»DET2 

COMMON  CN.DELT?,P5CiPSD0,RX0.RY0»RXD«,RVDB.  ILVD8. XLZO«* XLZ*. 

l*LTA»THOo»^Ho*CiO»TQ*T*R*Xo*VAX»R*To»VAT»RAZo»V42»Cl3»P2*«  C2**C3»  C 
24,C6»C5»C37»C3*»  XHr»P23»P22*XM,P24»P25,P2?»F.,Xi.C,XB.XJl.NTBLE,  OIA 
3MO,N0RO0,CKF.XLN.XJYr,C4«,XJ3,XJXX,C58,XJ2.XJZZ,C5l,x8H,C3O.C12,IC, 
4!ST£P»lP>lPl»VX»VY»YZ.XLC»D»DELT03.XIP13»0£LTO  » ZD TEST 
EQUIVALENCE  (DATa<  t  >»CN) 

DIMENSION  DATA!  73  ) 

D1 SPLF ( DA, DB  » DC  )-0A«( OB*DC >«0E T2/2. 

DIMENSION  A< 12/12  ),YAI 12 >,B< 12 > 

DIMENSION  TCMUTE(  12  I.DRU  12  >  » ILH12  > ,  XL0IU2  >,XLDD  H  12  > 

DIMENSION  DP  00  I  (  151/C  OR  ATM  15  ! 

C  IF  SJ1  IS  ON,  CASE  NUMBER  IS  READ  FROM  CARO  ANO  DATA  ON  PAPER 

C  TAPE  IS  SEARCHED  UNTIL  THIS  CASE  NUMBER  IS  FOUNO 

fi  IF  SJt  IS  OFF  ,  THE  FIRST  SET  OF  DATA  ON  THE  TAPE  IS  USED 

JF( SENSE  SWITCH  1)7000,7100 
7000  REAP  0000, CCH 
0000  FORmaTIFIO.O > 

7180  READ  TAPE  1,0ATA 

READ  TAPE  1  ,XKLA,XKO0,XKDA,PHO,PHDO,RZDO,RZ0 
READ  TAPE  1.(TChuTE< I ) , DR  II 1> , XL  I ( I I.XLDIU t.XLODII I I.I-X.NTBLE > 
READ  TAPE  1,1  OROOI ( I ),COR AT  1  (  l >, I -1.N0RDO ) 

IFISENSE  SWITCH  1)7200, *562 
7200  1 F( CCN-CN  >7140,0002, fi 08 
0002  PRINT*. CN 

4  FOftMAK 12M1CASC. NUMBER, F7,4/14h  DESCENT  PHASE) 

C 

nz-  i 

DO  00  ITBLE-  2.NTBLE 
JFt TCHUTEIIT8LE  )-T»)  M, 41,01 
00  CONTINUE 

•  1  TFRAC-I TO-TChUTCi ITBLE-t ))/( TChUTEI ITBLE  )-TCHUTE( ITBLE-1  )> 

XL- XL  I ( ITBLE-1 )♦( XL  II ITBLE )»XLI< I T8LE-1  )  >»TFRAC 
XLO  =  SLOH  lTei£-l  >♦!  XlDH  ITBLE  >-XLDU  I  TBlE-1  )  )*IFRAC 
XL XO -  -SORTTI  XL*XL*-XlT0«XLT0»XLZ0«XLZ6  ) 

XLXOO*  ( XL*XLD-XLYO»XLYOO-XLZO*XLZDO  )/XLXO 
C 

200  CET2-0ELT2 
PSl-PSG 
PSDl-PSOO 
RX1-RX0 
RTt-RTO 
RXDi-RXOO 
RTOfRTOO 
XLTD1-XLT00 
XLZOl-XLZOO 
C 

XLXOt*  XLXOO 
C 

XLZl-XLZO 

XLU*XLTO 

C 

XLX1-XLX0 
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nnnoo 

c 

.10000 

260 

Th 1»  THO 

06000 

THDWHOO 

00000 

R20iK?200 

00000 

RZ1»RZ0 

00000 

290 

PHDt-PHOO 

90000 

PH1-PM0 

00000 

300 

TT-To-T 

oooop 

f»AXl«f«AXo*  YA*»TT 

00000 

RAYt*RA?0*VAY*IT 

oocoo 

RAZ1*RAZ£»«VAZ*T? 

00000 

DO  410  1*1,12 

00000 

r a<  i  )-o. 

00000 

at  i  >-e. 

00000 

00  410  J*£»12 

00060 

410 

A<  I  ,  J )»0  . 

00000 

A ( 4,1  >«C13 

00000 

AC4,4‘*1. 

noooo 

AC  5,2  )*C13 

00000 

AC  5,5  >*1« 

00000 

AC  o , 3  ) »Cl 3 

eooco 

A 1  6 . 6  I  *  1 . 

00009 

490 

C10-C2O-PSO 

00000 

ci7-siNrcci6) 

00000 

C16-C0SF  t  C16 > 

00000 

497 

C19.SINFC  THO ) 

00000 

C20»COSFC  TWO  > 

00000 

C2l »Ci9/C20 

00000 

C22»C0SF C  PHO » 

00000 

C23-SINFC  PHO ) 

00000 

C24-S1HFC  PSO I 

qoooo 

C25*COSFC  PSO > 

ooooo 

C27»C25*C23 

00000 

C26«C24.C23 

ooooo 

4S6 

P1*aA*C19+C*C20 

ooooo 

P2»XA*C20-C*C19 

ooooo 

P3*P1 *C23 

ooooo 

P4*?t*C22«XB*C23 

ooooo 

P5*P3-Xb*C22 

ooooo 

C29»P2*C24 

ooooo 

C30«F5*C25 

ooooo 

C31*P2*C25 

00000 

C32*P5*C24 

noooo 

C33-2. *P4 

noooo 

C40  *C  24  *C22 

ooooo 

C41=C25*C22 

ooooo 

C42*P2*P2 

ooooo 

C43*PSD0*PSDQ 

09000 

C44*PmOO*PHD9 

ooooo 

C45*ThDQ*THD0 

00090 

C46«PHD0*PSD0 

ooose 

C47«pSOO*ThOO 

ooooo 

C4d*PnDO*THD0 

ooooo 

C52*2.*P2*C40 

ooooo 

C53*C33«C46 
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00000  M4«2.*C47 

00000  P7«C24*C19*C27#C20 

00000  Pd *C25»Ci9-C28«C20 

00000  Pll »Pi»C25-p2«C28 


00000 

00000 

00000 

00000 

00000 

00000 

ooooo 

00000 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

nnooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

nnooo 

ooooo 

ooooo 

00006 

nnooo 

OOOOO 

ooooo 

ooooo 

ooooo 

00080 

ooooo 

00030 

nnnoo 
nnooo 
nnnoo 
nnnoo 
ft  n  n  o  6 
nnnoo 


Pl2*plJC24*P2*C27 
p 13*029-030 
Pi4*C31*C3*' 

Pl5*C29-P3«C25 

P16«C31«P3»C24 

pi 8»pi#pi*x8»xb 

?19«(X*»X**C*C)»C22 

P2C  *P19*P3»XB 

P21 *C33«P4«  X  J1 

DO  3010  n  BLE-^.NTBLE 

1 F (  TCwuTC<  IT8LE  )-T0> 3010* 30 11.30 11 

3010  CON T  I  HUE 

3011  rr«Ac-<  to-tcmute< i tsce-i >  >/<  t chute 1 i  isle  >-?cmutu i tble-i > » 

DR»DRl  {  t  T8LP.-1  )♦(  DPI  1  I  ISLE  )-DR • <  l  T8LE-1  }  )• TFR AC 
OROO-OR/DJ AMO 

XL-XL i <  l  T9LE-1  >♦(  XL  l(  I  ISLE  MU  (  !  TBlE-1  >  >»IFRAC 
XLO«XLOl<  I  T8LC-1  )♦<  XLDIUT8LE  I-XL01U  I9LE-1  )  )*TFRAC 
XLOO-iLODJ( ! TBLC-1 »♦( XLDDK l  TSl£  >-XlDDIU TBLE-I  )  >»Tf8AC 
C 

GO  TO  (  1  *  2  i  NZ 

1  XLX2*  -SORTF( XL«XL-XLYO*XLYO-XLZO«XLZQ > 

IF( XLX2«1.  >11* 12*12 

11  XL  X 0 •  XL  X  2 

XL  X  0  0 ■  (XL«XLO-XLTO*XLTDO-XLZO*XLZDOJ/XLXO 
00  TO  3 

12  NZ-  2 

xlxDO-  y€LOCF( XLX01»8( 4 >  ) 

XL  XO  *  0  1  GPLf { XLXl/XLXDl»XLXDO > 

2  XLZO*  SQRTF( XL«XL-XlXO*XLXO-ALY0*XLYO > 

XLZ00»  {  AL»XLD-xLYO*XLTOO-XLi?esXLXOO  i/Xl.ZO 

3  P37-  RxDO«XLxOO-P13»PSO0»P4»C24«PhDO-PH*ThDO 
C 

P3«*RTDO*xLTOO»P1 4*PSDO-P4*C2>*PHDO-P12*THDO 

P39*«ZDOMLZDO-pS*PhOO+P2*C22*TnDO 

00  A o 1 0  lDROO«2,NORO0 

IflORDOU  1 DROO  J-ORDO >4010*4011*4011 

4010  CONTINUE 

4011  CORaT*CDRaTJ< 1 DROO- X  >*(CORATI<  i DRD  0 ) -COR  AT i ( I OROO-1 > ) » ( DRDO-ORD 0 i ( 
lJORDO-1  )  1  /  (  DR  D  0  I (  I  DROO  I-OROOH  IORDO-1  )  > 

XXF «cxr *CORAT 

P40*XXF/XL«»SORTF<  P37 «P 37 *P38*P38»P394P39  ) 

4(1.1  )»-P4 
4(1.3  )  »P 1 4 

A ( 1 . 4 >«-P4 
A (  1 . 0  )-Pl 4 
4(1. 7 }»P4*P1 

A ( 1  *  9 )»-C31»P5-C24*(  X JY Y»Pi#  ) 

4(  1.9)»C23*iP20«C22»|jYY  )-C2 4 *P2«X8 

T  A  (  1  >»-P14*32.16«P40»(  P4*P37-P14*P39 )-p4«pj4»C43»C3l*P4«C44-( Pl2*  X 
l84C28*C22*C49>«C45-*C23*P2l#C4<.*(C40*XJi  +  C33*Pl2)*C47»Ct>2«Pl2-C27*X 
2J34C48 
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ftfinno  ac  2 , 2  )*p4 

nnooo  ac  2 , 3  >»-pi 3 

nnooo  ac  2 , 5  ) «p 4 

ftcoao  AC2,6l«~Pl3 

nn nnn  ac 2.7  )«P4«Pt4 

nnnno  AC  2.3  >»P2*C32-C25*< Pli*XJXX  ) 

nnnnn  AC  2/9  )»-C3i»XS-P2Q«C24-C40*XJXX 

"«n«n  Y A(  2  »«P13*32«16»P4 &•(  Pi3*P39-P4*P36  )4P4*Pi3*C43-C29*P4«C44-( Pil*x8 

nn«an  i»C2  7»C22»C5o )*C45-C24*P3i*C46MC33«Pu*C4l*XJi  >*C47*C32*Pli-C26*X J 

nnooo  22»C48 

nnooo  A(3/1)*P13 

nnnnn  AC3,2)*-Pt4 

nnnno  AC3»4)>pi3 

nnnnn  AC3.5)— P14 

nnnnn  AC  3. 7 ) — C42-P5#P5-X JZZ 

nnnnn  AC3.0J-P2*P4 

nnnnn  AC  3/9  »*P1«P5*C23»C X  JZZ4C42 > 

nnnnn  YAC  3 )»P40*C P14»P3«-P13*P37 )♦( P2*P5-C24*C25*C51 )«C44*C22*(P2*XB*C40 

nnooo  1 «C25*C91 )»C45*C53*P5-C54»P2*P4*C22«C2a*C48«(C0Sr<  2.*PSQ )*C5t-XjI2- 

nnnoo  22*»C42) 

nnoco  AC4»7)«-pi3 

nr.000  AC  4. 6  )*P4»C24 

SftOOO  AC4/9)»-Pil 

nnooo  AC9/7J-P14 

nnnno  AC  3. 8 >«-P4*C2A 

nnooo  AC5/9)— P12 

rtnnoO  AC6/S)-~P3 

nnooo  AC  6.9 )<=P2*C22 

nnooo  AC  7/4  )«XLX0 

nnooo  AC  7/9  )  *XL  Y  0 

nnooo  ac  7/o)»xlZ0 

nnooo  YAC  7)*XL*XLOO-  XLXOO*xLXDO^xLYDO*XLYOO-XLZOQ*XLZOO«XLD»XLO 

nnooo  AC  0/2  )" xsm« xlZ 0 

nnooo  AC  6.3  )«>-XSM«XLYQ 

nnooo  AC  9/1 )  *  AC  6,2) 

naooo  ac  v.  3 )  — xsh»xlxo 

60000  470  P9»C24«.C20-C27*C19 

00000  P10«C25«C20 ♦C26«C19 

00000  PI  7 "022*019 

00000  P36>ftxD0*PXQ0»firOO*R}D6«fl2O0«R2O0 

noooo  C5e>« SQR  t  F C  P36  ) 

nnooo  C57«< PlO«RXDO*P9«RYDO+Pl7»RZOO  >/C9* 

00000  C5S-SQWTFC i.-C57*C57) 

OOOCO  ALPHA »ACOSFC  C97/SQRTFC CS7«C5  7*C56«C56 >  > 

nnooo  1FC C56 >9000/9001/9001 

00006  9600  Al?HA«-ALPHA 

00000  9001  XKL«XKLA« ALPHA 

06000  XKO*XKDO*XKOA*ALPmA««LPHA 

nnnoo  TA<4)«-CXK0«P10»XKL*Pd )*PJ*/XLK-P37*P40»P14»C43*C32»C44«P16«C49-C9 

OOOOO  13»C23-P12»C94-C52*C40 

0  0000  YAC  9  >»-(  XK0»P9*XKL»P7 ) •P3*/XLtt-P30 «P40 «P1 3.C43-C30 »C44*P 1 9«C46-C24 

OOOOO  l*C53*Pll«C54«C52»C4i 

OOOOO  YAC  6  >»-C  XK0*C19-XKL  *C20  )*P3O*C22/XL«-C39-P39*P40  P4«C44»C22«P 1*C45 

0  GOO  0  1«C92«C23  / 

OOOOO  YAc6)°P36«(xLY0«C22»CXX0*C19-XXL*C2e  )’'XLZO«C  XKD4P9+XXL*P7)>«Ct2*XL 


ur  A  4-  4. 
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nnooo  iTO 

nnooo  TA<  9  >«P36*<  XLXQ»c22«(  XKD«C19-XKL*C20  >-XLZ0*I  XKO«PlO*XKL*P«  >  I*C12*X 

00000  1LX0 

00000  500  C*UL  SImEOI A,YA.8,k  ) 

00000  ISTCP--ISTEP 

08000  JF<  JSTEP  >310,900.350 

ooooo  3io  ip«ip*i 

00000  IFC  IP-JPI  )210»  220/220 

••-000  210  GO  ro  210 

09000  220  X«RX0*VX«TT 

90000  YmRY0«VY*TT 

60000  Z»RZ0*VZ«TT 

sc-aao  xp»x*xlxd*p14 

00000  TP»T*Xl.fO*P13 

00000  ZP«Z>XLZ0*P4 

00000  XD'RXDO* VX 

nnooo  ro»Rroo»vr 

nnooo  zo«rzoo*vz 

nnooo  TC-*SGRTF<XSM*XSM«<8<  l >*8(  1 )*B( 2  >*B<  2  >♦<  8C  3  >-32.16  >*(B<  3  >-32.16  i  »♦< 

nfi503  1XKL*X*L«X*0«XX0  >»P36*P36*2.*XSM*P36Mb( i >*« xXL*P*-XKO«Pi 0  >«8<  2  >•( X 

nnooo  2KL»P7-XKD»P9  J-t  at  3 )-32.lo  >•£  **L»P6*XKD*Pi7  >  i  > 

nnooo  PRIM  20»T0»X»Y,Z»XD«Y0»ZD»XP*TP»ZP.PSQ»PHC»THQ.(BI I » . 1-1.91 

nnooo  PRIM  2t,TC 

nnooo  20  FORHAT<//74FP0.4/  <2$X,3F20.8  )» 

nnooo  21  FORMAT! 20X , F20.fi  ) 

nnooo  IP*Q 

nnooo  IT<Z  -ZO  TES  T  >901.901*356 

onnnn  90i  PRJM  50, To 

nnnnn  GO  TO  900 

nnnnn  216  ZD»RZD0*VZ 

nnnno  IF<Z  -ZO TEST )?1 7 . it  7 , 350 

nnnnn  2i7  PRIM30.TO 

nnnoo  50  FORMAT! ///F2C.8.21H  E*D  OF  DE5.CEM  PHASE) 

nOOG  GO  10  220 

nnooo  350  RXDC*vELOCF(fiXDl.B( 1  )  ) 

noooo  RYOO«VCLOCFC RTC1 .81 2 n 

noooo  XLrOO=V£tQCF( XL TDi r 8( 5 U 

noooo  PSDO*Y£LOCF(PSOi»B<  7  )  ) 

00000  RXO«0 I SPLF( RX1 ,RX01 ,RXDO  i 

ooooo  rto«oisplf<ryi,pyo:.rydo> 

OOCO0  X  L  TO  *D I SPLF  < XLYl,XLrDl,XLTOO) 

OOOOfi  PSO«01SPLriPSl/PSDl,PSOO  ) 

OOOOO  3o0  PhOO  =  VELOCF< PMOl ,8( 4  )  ) 

OOOOO  PHO*OISPLF(PHl/PHOl,PHOO  ) 

OOOOO  370  ThQO«YClOCF( T  hDI . 3< 9)) 

OOOOO  TWO-DI SPlF<  Thi , ThOI , THDO  ) 

OOOOO  R?QO»YELOCF(R7Di,B!3>) 

Q00$«  R70«01SPLF< RZ1 ,RZD1 »PZDQ > 

ooooo  c 

OOOOC  GO  TO  <13.141  NZ 

OOOOO  13  XL  ZOO ‘  VELOCF<  XLZ01 >  b<  6  )  ) 

OOOOO  XL  Z  0 ■  OISPLFJ XL Z 1 , X L Z 0 1 , XL Z DO ) 

ooooo  go  fo  300 

OOOOO  14  XL  XOO*  YELOCFI  XLX01»8<  4H 

90000  XLiO«  OJSPLFi XL M , XL|Di,XLXOO  ) 


o  a  rt  e  u  a  Tv*  1 
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00000 

c 

00090 

390 

T9-TO»OElT2 

ooooo 

OET2«OELTO 

90000 

1 rc I  STEP >390,990.200 

00990 

ooe 

STOP 

cr.et>9 

end 
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09000 

* 

90000 

c 

GROUND  SLIOE  AIRDROP  STSTEM  INPACT  PHASE 

•  0000 

VELOCFl DA,De }-0A*DBoDET2 

•  0000 

OISPLf!  Oi,D8.DC>»OA*(08«OC  >*0ET2/2. 

•  0006 

Common  T0#DEl70.Xl»X88*TH0.THD*»XLX*»  XLXD#»  VX* VZ. ALT* XK1* XK3. 

00000 

IxA.xC.D.F.xLC,*  lTY.Xxr,xSM,-!.*,>CN/TKe«Ax,0CMuT£,XKu.xL,ri,xl»,!.?D6 

00000 

2.  XDO 

oc-oeo 

EQUIVALENCE  <DaTA<1>.I0> 

00000 

dimension  A! e*8 >. YAS 1  >.81 • > 

oeooo 

DIMENSION  DATA!  3i I 

eocoo 

READ  10.  DATA 

00000 

10 

FORMAT! 6F10 .3 ) 

09000 

PR1NT20.CN 

oococ 

20 

FORMAT! 12H1CASE  HUMBER , r J . 4/ 7M  IRPACTJ 

00005 

P'-MnT  30.0ATA 

00000 

30 

FDSMAT!//6H  INPUT/! «F1*.3/ ) > 

00900 

TS<  THO  >50.260*49 

30000 

49 

DX»-XLC*0 

00000 

GO  TO  44 

•  0000 

50 

OX  *XLC-»0 

00059 

44 

iK.l 

OOOGO 

43 

DELT2-OELT0/2. 

60000 

IPI-XIPI 

50000 

IP»|R1 

2000 

ISTEP'l 

00000 

55 

ASSIGN  63  TO  ICHECK 

00009 

ASSIGN  65  TC  1SKIP 

00000 

ASSIGN  71  TO  100 

00000 

60 

Cl«  S INF  1 ?hq  > 

09000 

C2*  COSF ! THO  1 

00000 

Pt*  xA*Cl«XC«C2 

00000 

P2»  XA«C2-XC*C1 

00000 

P3*  XK1*C1*XK3«C2 

•osoo 

P4>  XKl*C2>XK3«Ci 

oocoo 

P5«  OX  *C i «  F  »C2 

00000 

P6»  0X*C2-F*Ci 

00000 

GO  TO  ICNECX 

00000 

63 

XLZO*  SORT!" (  X>.  •XL-XLX0*KLX9  ) 

00030 

XLZOC-  -XLXO*XLXOO/XLZO 

OOOOi 

Z0-  ALT-P5 

03000 

ZD0«  -P6»TnD0 

50000 

GO  TO  ISKJP 

60360 

64 

XO»  XEA*P6EA-P6 

00000 

XDO»  P5« ThOO 

00009 

65 

P7»  X00*XLS30-Pl»rHDj-VX 

00000 

P6«  ZD0*XLZD0*P2»ThD$-vZ 

00000 

P9-.  XKF*SORTF  !P7*P7«P6*P6  >/XLK 

00000 

P 1 0>  P7*PO-P2*THDO»TIJOO 

60000 

PI  1  *  P9«PV-PI*Tm00»T9D0*J5.1o 

00000 

00  70  T-1,6  J 

00000 

TA!  I  >»  O.G 

09090 

00  70  J«l.& 

00000 

70 

At ; » j>»  o.o 

•  •900 

A!  1.1 >*XSM  ♦  XLM 

MC 
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ooooc 

4(1*2)"  XLM 

30090 

CO  TO  ISO 

00000 

71 

4(1.5>  — XLM  •  PI 

aoooo 

4(1,4)-  X Mu 

80000 

U1H"  -Fl-xLH-PiO 

00000 

4(2,3)-  XSK  ♦  XLH 

etooo 

4(2*4)-  XLK 

90000 

4(2*5)-  XLK  «  P2 

00000 

A(2*6)«  -1.0 

00009 

TA( 2 )«  -XSH»32«16-XLH*Pil 

90000 

4(  3.1I-P1 

00Q09 

4(3.2)-  PI 

90000 

4(3.3)-  -P2 

00009 

4(3,4)-  -P2 

030  0  0 

£(3.5)-  -( XlTY/XLK4Pl»Pt4P2*P2> 

ooooo 

4(3,6)-  ( P4»XHU*P5 )/|LK 

90000 

Y4( 3  )  "  P2«P11-P14P10-F1*P3/XLK 

00009 

4(4*4)-  XLZO 

ooooo 

4(4.2)**  XLZO 

ooooo 

4(4.3  1--XLXC 

ooooo 

4(4,4)-  -XLXO 

00009 

4(4.5)-  -P1*XLZ(*-P2*XLSS 

ooooo 

74(4)-  P11*XLX0~  SsxLZf 

ooooo 

4(5.2)-  XLXO 

•  eooo 

415.4)-  XL  ZO 

ooooo 

T4C  5  »-  -(  XLXOO-XLXOO|'i(LZDO*XLZDO  ) 

ooooo 

4(6.3)*  1.0 

ooooo 

4(4,5)-  P6 

90000 

74(6)-  P5*THOO*ThOO 

ooooo 

1 F l (STEP >320,390,310 

ooooo 

310 

DET2-OELT2 

00030 

Xt-XO 

OOOOO 

XD1-XOO 

ooooo 

XL  X1-XLX9 

00006 

XLXOl-XLXOO 

09000 

VHl-lHO 

09000 

TmOI-TmDO 

09000 

X-6 

00909 

J-X-l 

09000 

330 

C4LL  S ! H£Q( 4.T4.9.K ) 

ooooo 

(STEP  — (STEP 

00008 

1F( !STEP)00.909.170 

oasoo 

so 

IP-JP-i 

00090 

1F{  IP-IPI  1128.100,100 

40000 

100 

PPiNTllQ.TO.XO.ZO.THO.XOO.ZPO.THOO.XLXO.XLZO 

•0090 

no 

FORMAT ( 7//4F20.0/  (20X.3F20.4  )) 

00000 

1P-0 

00900 

120 

I F ( X DC -P3*  T  HD  0 >220,230,130 

00600 

130 

IF (  Tm£3K4s;*TmCH4.<-TH0»THQ  >149,100.140 

00090 

140 

I F (  I«-3  )  1 41 , 150 d 141 

ooooo 

141 

IF(<  4UT-F )*( 4LT-F >-ZO«Z 9 >240 . 240 , 150 

ooooo 

ISO 

IF ( ( UT-26-XLZ0-P1 )•<  4LT-Z0-XLZ6-P1 )-DCHUTE* 

00060 

170 

THOO-VCLOCF<  T HDt.BC 5 ) ) 

09909 

THS/»0 1  SPLF (  TKl.THOl.THOO  i 

90000 

4170 

XOO-yCLOCF(  XOl/dt 1 V } 
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*0080 

00009 

00090 

00000 

00000 

ooooo 

00009 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

Ooooo 

ooooo 

ooooo 

ooooo 

00300 

ooooo 

ooooo 

0000'1 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

<Jeoco 

ooooo 

80000 

ooooo 

ooooo 

03000 

ooooo 
•  0000 
ooooo 
ooooo 

00900 

OOOOO 

ooooo 

ooooo 

ooooc 

ooooo 

ooooo 

ooooo 

00009 
06000 
•  000* 

0*000 

10009 

ooooo 

ooooo 


SL*O0«vELOCr<  ,8(2  > > 

X0»DI3PLF(X1.XD1»XD0) 

Xl.XC«D]SPlf<XLXi»XLjrDi»XLxDO> 

T 0*T0 ♦CELT  2 
DET2*0EL  T o 
!K«0 

00  TO  55 
160  PSJXTIOO,!* 

190  FORMAT</F20. 8.23m  CARGO  LIKELT  TO  TURN  OVER) 

*00  STOP 

260  PR  t  N  T210  »  TO 

210  F Ocm  a T(  /FJ0.6.46H  CHUTE  IN  CONTACT  WITH  GROUND. IMPACT  EDGE  MOVlNO) 
GO  TO  360 
220  PRINT230.T0 

230  foRmati /reo.e.oiH  impact  edoe  has  stopped  moving) 

GO  TC  390 

240  IF! DX )250. 900,260 
250  ThO-O. 

IK»2 

0X*XLC*0 

TMDO  —  (  .3«ZOO/DX  ) 

30  TO  9170 
3*0  P»InT270,T0 

270  FORMAT! /F20. 8. 23H  ST*§LE  SURFACE  CONTACT) 

GO  TO  300 
260  IP-IPI 
IST£P«1 

330  DET2-0CLT2 
Xl-XO 
XD1-XD0 
XLX1«XLX0 
XLXD1«XLXD0 
TH1«TH3 
TH01*Th00 

335  ASSIGN  63  TO  ICMECK 

ASS  t  GN  65  TO  ISKIP 

ASSIGN  72  TO  100 

GO  TO  60 

72  A<1,5)«  -PI  •  XLM 

A !  1,6  ) *  XMU 
TA< 1  )«  -F 1— P 1 0 • XLM 
A(  2,3)<>  xSM  ♦  XLM 
A ( 2  »  4  )«  XLM 
AC  2 , 5  )«  P2  •  XLM 
A! 2.6  )>  -1.0 

A ( 2 . 7  )«  -l.o 

Y  A  t  2  I  *  -32.16»XSM-Pli*XLM 
A ! 3 , 1  )  *  PI 
A!  3 . 2  )•  PI 
A<3.3)«  -P2 
A( 3,4)*  -P2 

A! 3. 5  >*  -(  X  I TT/XLM«P1 *P1*P2*P2  ) 

A ( 3,6)"  ( P6*P5«XMU J/XtM 
A! 3, 7  )■  P2/XLM 

T A! 3  ) ■  P2»P11-P1*P18-F1*F3/XLM 


TV 


r  au  t  r«  . 
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o 

z 


OOC-OQ 

aoooo 

00000 

00003 

00000 

oaooo 

•  oooo 

«0908 

09000 

•  0000 

•  9000 
0*080 
00000 

•  9000 
80008 
00000 
00006 
90008 
00000 
08000 
60900 
00000 
00080 
04000 
900C0 
80008 
06000 
60000 

•  OOOO 
90000 

•  0000 
00000 
00000 
oeooo 
60000 
00000 
88000 
8*000 
00000 
90G08 
0C9C9 

ofocs 
09000 
00090 
0000  9 

80060 
90090 
•  0000 
00000 
•  0000 
00000 
90000 
•  6000 
00009 
90000 


AM. II-  XLZO 

AM»2)»  XLZO 

AM.3I-  -XLIO 

AM. 4)-  -  XLX 0 

A( 4,5  )*  -< Pi-XLZ8-P2»XLX# > 

A<4.7)«  XLXO/XL* 

TAM>»  Ptl4XLXO-PlO«'XLZ0 
A  (  5 , 2  )-  XL  XO 
A  <  5  »  4  )  -  xLZO 

TA(5  >-  -I XLXDO«XLXOe*XLZDO*XLZOO  ) 

A ( 6,3)*  2.0 

A{  6  »  5  )  ■  P6 

T  A ( 6  )  •  P5 • TmD0*ThD0 

A(?.3>»  1.9 

A(  7, 4 ) •  1.0 

A S  7, 5 )»  P2 

1 41  7  I*  P1-ThDO*THQI 

K-7 

CALL  3JH£0{  A.TA.B.O 
ISTEP— IST£P 
ire !ST£P>36Q.9O0.4J5 
380  IP-tP-i 

lf( 1P-IPI >300.3 70.370 

376  P8HTllO.ro. XO,ZO.THO»XDO/ZDO,?HDO»XLX8»XLZ3,<B<  I  1.1.1.71 
IP-0 

390  in X0a-P5*rM00 I488.460.416 
41Q  in  |K-2)4ii, 430.411 

411  JF(  <  AI.T-F  )*t  ALT-f )-Z9*Z0  1420 .428, 430 
430  ire  TKOMA*-THO>14X-TMCtfTMO>l#0.  1*0,435 
435  T«O0-veLOCnTH81,Bi5>> 

THQ-OIS^LFI  TH1.TH01.TH0C) 

9435  XOQ*v£LOCf  UDi.«3<  1  >> 

XLXI'0-yEL~CF<  -LXDl  ,B(  212 
XO-DISPIF. X1.X01.X00) 

XL  13 *0 { SPL F 1 XLX1.XLX91.XLX08  ) 

TO  » I  3  *0EL t  2 

0ET2-0CLIC 

H»0 

I r  <  iS?£P)335,800,330 
420  If < Ox *5^0.900, 570 
560  ?H3-0  » 

IK-3 

OX-XLC.D 

THOO  —  l  . 3-ZOO/OX  ) 

CO  10  8435 
298  XEA-XO 
P6EA-P6 
450  IP-IP1 
l  S  T£P  » 1 

460  OE 12-DEL  1 2 
XLXt-X.LXO 
XL  XOt -XL  XOO 
IH1 » IhO 
t  >»0l  *  T HOC 
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AIRCRAFT  ARMXUENTt.  I  no. 


00000  465  ASSIGN  63  TO  !CH£CK 

00000  ASSIGN  64  TO  1SKIP 

00000  ASSIGN  73  TO  IGO 

00000  GO  TO  60 

C0O00  23  A { 1.51“  -PI  «  XL* 

00000  All. 7)*  1,0 

00000  -Tl-Pl0«Xl.N 

80000  At2»3T»  XSH  ♦  XL* 

00000  A I  2  *  4  )  ”  XL* 

00000  A  <  2 . 5  >*  P2  •  XLH 

00000  A(2.6)«  .1.0 

00000  TA<  2  I*  -XS*«32.16-Pli*XLN 

00000  A( 3.1  )«  PI 

00000  At3.2>*  PI 

00000  A<3.3)=  -P2 

00000  A(3>4)«  -P2 

00000  A  (  3 «  5  )  *  -<P1«P1*P2*P2*XUT/XLN> 

00000  A  (  3 »  6  >  *  P6/XLM 

00000  A<  3. 7  )«  P5/XLM 

00000  T  A <  3  ) *  P2*Pll-Pl*P10-T'l*P3/XtM 

00000  A(4,l)*xt?0 

00000  A  (  4 . 2  >»  XLZ0 

00000  A  (  4  >  3  )  *  - XL X0 

00000  A ( 4.4  )  *  -XL  X  0 

00000  At  4,5  )-  -<  PHxLZ0*P2»Xl.X3  > 

00000  TA<4)»  Pll*XLX0-Pie*frLZ0 

00000  A  <  5 »  2  )“  XL  X  0 

00000  AI5.4>«  XL  Z0 

00000  TA<5>"  -( XLX00»XL*00*XLZ00*XLZD0  ) 

00000  A  t  6 , 3  ) 1  t.G 

00000  A(6,5>-  P6 

00000  TA(61-  P  5 • 7  hD0» I HO0 

00003  A<  7  ,  1  >»  1,0 

00000  A(  7,5  )»  -P5 

00000  t  A ( 7  1*  P6» IHBO* T*0§ 

00000  K  »  7 

09000  j  »  *.  » 1 

000-30  CALL  SIKEGI  A.YA.n.S  5 

oosoo  •;  step*--!  step 

OOOOB  IFi i ~TCP >*90,900.535 

00000  490  IP*tP*l 

080C0  IF<  IP-IPI >520.500.500 

'■> 0 0 S  50*  PRINT  110, 10.  xo  .  Z0»  7  MO.  XOO,  ZDO.  IM98.XLSS.  XLZO,  <  B(  I  >.  1  »1 .  7  > 

#8000  Jp«0 

SS90C  l?i  IS-2J520. 530, 520 

50000  520  IF! < ALI-F >«( ALI-F >-Z9aZ0  .540.540.525 

60000  525  I  <! 4LT-Z0-XLZ0-P1 5*1  AL T-Z0-XLZ0-P1 )-0CKU>E*0CM«TC/9f >400.400.530 

00000  530  jfi rN0PAx«<HOMAx-TH0*TW0 >100.110.535 

80058  535  TmQ0=vELCCF< TmOI .81 5 > > 

08000  TrtO^OISPLFI  IH1,  Ij^OI.  THO#  > 

IOOOO  9535  Xi.xDQ*vCtCCF!  xlxOI.8?  2  >  i 
*006?  XI  XO-OI  SPLF(  XLXl»U*Ot*iJLXO0> 

00900  TO«TS*OtLT2 

90&00  DE?2»LEIT0 

OSSOO  U*0 


r»  . 


rAOt 


r\_  V  9Q 
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nnooo 

nnooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

0000$ 

ooooo 

ooooo 

ooooo 

nnooo 

ooooo 

ooooo 

ooooo 

oooso 

ooooo 

ooooo 

ooooo 

OOOOO 

80000 

00008 

ooooo 

80000 

ooooo 

00008 

00008 

8Q0CQ 

ooooo 

ooooo 

08000 

ooooo 

ooooo 

ooooo 

ooooo 

90000 

00080 

80000 

ooooo 

03000 

00009 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

ooooo 

00009 

ooooo 

00008 

§0000 

ooooo 

80009 

09000 

80089 


ire  'STEP  >465.000.460 
540  JFC OX >550.000.260 
550  xCa»X0»XlC*2. 

•6EA*Dx«C2-F«Ci 

THO'O. 

I  K«? 

ox  *  xlc«o 

TkDO*  C . 3*100/0*  > 

CO  To  «535 

400  P«r  588. TO 

580  FORMAT! /F20.A.48H  CHUTE  {N  CONUCT  NITh  Q«OUK,D,  IMPACT  PT.  STOPPED) 
XCA-XO 
P6E  9 •p6 
598  IP«IPI 
ISTEP-1 

600  0ET2»0ELT2 
XLX1-XLX0 
XL  x  01  *  XLXDO 
TM1.TH0 
TMOl'THCi 

605  ASSIGN  03  TO  i CHECK 
ACSICtt  fti  to  ISX1P 
ASS  ION  74  TO  1G0 
GO  TO  60 

74  *C1.5>»  -PI  •  XLM 

A ( 1.7>-  i.O 
YA<  1  )«  -n-PlO#XLH 
A<  2. 3 )»  XSM  ♦  XLM 
A ( 2 . 4 ) «  XLM 
A(2.5>r  P2  •  XLM 
AC  2. 6  )•  -1.0 
AC  2 . 9  )*  -1.0 

X  AC  2  >«  -32 . 1 fc* X SM-P1 1«XLM 
AC  3.1 >»  PI 
AC  3.2 )*  PI 
AC  3.3>-  -?2 
AC  3 • 4  > »  -P2 
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Table  I  is  a  listing  oi  tiie  appropriate  input  values  lor 
tiie  drop  phase  computer  program.  Table  II  is  a  listing  of  the 

input  values  for  the  impact  phase  computer  program,  sone  of  which  are 
obtained  from  the  remits  of  the  drop  phase  computer  '.in. 
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D.  Lateral  Restraint 

It  was  originally  thought  that  the  pilot  would  fly  the  aircraft 
\n  a  craboed  position  during  a  crosswind  situation.  In  this  position  he  would 
have  lined  the  aircraft  up  with  its  velocity  vector  in  the  wind  fixed  frame 
of  reference.  The  extraction  parachute  in  this  case  would  be  directly  behind 
the  aircraft,  because  the  parachute  always  lines  up  with  the  aircraft  velocity 
vector  in  the  wind  fixed  frame  of  reference.  Taking  this  into  consideration, 
the  computer  program  was  written  excluding  a  lateral  movement  restraint  require- 
ment  in  the  extraction  phase.  Such  a  restraint,  of  course,  is  unnecessary  when 
the  extraction  parachute  is  directly  behind  the  load. 

Due  to  the  difficulty  encountered  in  trying  to  maintain  a  stable 
attitude  while  flying  the  aircraft  in  a  crosswind  situation,  the  actual  cases 
proved  to  be  different.  When  only  a  few  feet  above  the  ground  the  pilot  was 
concerned  primarily  with  motion  in  the  direction  that  would  result  in  ground 
contact,  i.e.,  pitch  angle  change  and  vertical  motion;  therefore,  the  aircraft 
was  usually  not  lined  up  with  the  resultant  velocity  vector.  The  parachute 
in  this  case  would  not  be  directly  behind  the  aircraft,  but  would  be  off  to 
one  side.  How  extreme  the  parachute  is  off  to  one  side  depends  on  the  magnitude 
of  che  angular  difference  between  the  actual  aircraft  heading  vector  and  the 
velocity  vector  of  the  aircraft  in  the  wind  fixed  frame  of  reference.  Lack  of 
a  lateral  restraint  in  the  extraction  phase  of  the  computer  program  will  allow  the 
load  to  exceed  the  lateral  boundaries  of  the  aircraft  when  acted  upon  by  some  side 
force.  The  side  force  in  this  case  is  the  lateral  component  of  the  extraction 
force  produced  by  the  misaligned  parachute.  In  a=tualit>  the  load  cannot 
exceed  the  aircraft  lateral  boundaries;  thus  an  error  could  be  produced  in  the- 
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computer  results  without  this  restraint.  To  add  this  restraint  requirement  to 
the  computer  program  would  mean  a  major  change  to  the  program.  It  was  found 
that  the  error  this  caused  could  be  minimized  by  forcing  certain  inputs  to 
be  particular  values  in  the  tip-off  phase.  The  two  inputs  that  were  changed 
were  the  yaw  angle  (?)  and  the  lateral  position  vector  (r  y) .  These  two 
quantities  were  given  values  they  would  have  at  tip-off  if  the  load  were  laterally 
restrained  by  the  aircraft. 
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Included  in  this  section  are  the  changes,  deletions,  and  revisions  to 
the  Phase  I  report.  Major  changes,  deletions,  and  revisions  are  not  necessary 
due  to  the  close  agreement  of  the  results  from  the  computer  analysis  when 
compared  to  the  actual  occurrence.  There  are  a  few  minor  changes  that  will 
further  refine  the  analysis  if  incorporated.  The  following  changes  and 
revisions  should  be  incorporated  in  the  Phase  1  Report. 

The  limits  of  the  extraction  point  locations  with  respect  to  the 
cargo  C.G.  in  both  the  vertical  and  lateral  direction  should  be  changed. 

These  changes  are  as  follows:  Vertical  distance  from  G.C,  to  be  within 
+  10  inches  and  ~5  inches.  Lateral  distance  from  C.G,  to  be  within  +  5  inches. 
The  lateral  limitation  was  decreased  because  the  cargo  could  become  jammed 
in  the  cargo  compartment  and  cause  aircraft  damage,  when  the  lateral  offset 
distance  was  too  large. 

The  longitudinal  limitation  in  the  location  of  the  C.G.  from  the  center 
of  a  9  foot  platform  can  be  changed  from  +  b  inches  to  +  10  inches.  The 
maximum  offset  was  not  found  during  the  testing  program  but  the  load  did 
survive  with  a  +  10  inch  offset. 

The  limitation  of  the  12  know  crosswind  is  not  a  prodiut  caused  bv 
system  operation  as  originally  thought.  Instead,  this  limit  is  influence! 
mainly  by  the  ability  of  the  pilot  to  manipulate  the  air. raft  in  excessive 
crosswind.  Since  tno  aircraft  flies  very  close  to  the  gro  :ic,  it  is  effected 
by  the  ground  turbulence.  This  turbulence  causes  the  aircraft  to  move  cite 
erratically  and  almost  impossible  to  control.  Aircratt  dipping  ana  lifting 
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10  feet  is  common  with  ground  turbulence  caused  by  a  12  knot  wind.  Thus, 
in  most  cases  the  pilot  will  fly  the  aircraft  20  feet  or  higher  above  else 
grou 'd  with  a  crosswind  of  12  knots  or  more.  This  drop  altitude  will  cause 
cargo  damage  for  excessive  impact  forces. 

Sufficient  data  was  not  acquired  to  state  whether  the  limits  on  the 
impact  angle  are  maximum.  However  in  test  no.  14  the  load  impacted  at  a  i4° 
tail  down  angle  with  load  survival. 

As  the  load  descends,  it  oscillates.  For  loads  tnat  are  alike,  the 
oscillations  will  be  identical.  Therefore,  the  impact  angle  is  dependent 
on  the  altitude  for  any  load.  Further  investigation  is  needed  in  this  area 
to  more  closely  identify  specific  load  properties  with  oscillatory  motion. 
This  in  turn  will  also  increase  load  survivability. 

At  this  time  there  have  been  no  tests  of  multiple  load  delivery  using 
the  ground  slide  system.  It  is  recommended  that  efforts  be  directed  in  this 
area  to  gain  this  much  needed  knowledge. 

On  all  except  one  of  these  tests,  the  cargo  vas  restrained  to  the 
platform  use  of  chains.  These  were  used  so  that  the  load  would  not 
shift  at  all  during  the  testing.  Qf  course,  in  <m  actual  air  delivery 
situation  regular  restraint  straps  are  used.  The  information  acquired  from 
the  tests  can  be  applied  to  an  air  delivery  situation,  in  that  tue  shifting 
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A  special  platform  is  needed  that  will  resist  overturn,  withstand  the 
forces  excerted  upon  it  at  ground  impact,  and  prohibit  bending  in  the  longi¬ 
tudinal  direction.  This  platform  will  basically  have  a  rounded  front  edge  and 
heavy  rails  that  run  longitudinally.  The  platform  used  in  the  test  phase  had 
these  physical  qualities,  but  it  was  over  designed.  During  the  testing  the 
only  part  of  the  platform  that  seemed  to  show  any  failure  *as  the  bottom 
surface.  This  failure  only  appears  on  the  platforms  that  have  wooden  panels. 
The  design  o:  the  ne.v  platform  should  have  as  ,ts  goals:  low  cost,  light 
weight,  bending  resistance  in  rails,  and  overturn  resistance. 
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U.  AOiTRACT  ~ 

This  report  is  a  continuation  of  the  Phase  1  Report  of  the  Ground 
Slide  Ai  rdrop  Study  conducted  under  Contract  Vo.  DA19-129-A*iC-337(K) . 
The  object  of  the  report  is  to  present  the  findings  of  the  Exploratory 
Test  Phase,  Phase  II,  and  to  compare  the  actual  findings  to  those  pre¬ 
dicted  by  the  Phase  1  study. 

Results  of  limited  flight  tests  conducted  at  Ft.  Bragg,  Forth  Carolina 
mare  presented  and  compared  to  analytical  results  which  were  generated 
j  using  icst  conditions  as  input  values.  In  general,  the  test  valu.-s  and 
I  the  computed  values  arc  in  close  agreement. 
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,  Also  included  are  all  changes,  deletions  and  revisions  to  be  incorpor- 
*  ated  in  the  preliminary  design  specifications  of  the  Phase  I  report. 
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